Index: library/serialize/serializer.tcl
===================================================================
diff -u -r494410d936ca8f8481faa2a13447c9289e5ef7e9 -rf9f501ffe3b3bd7a3843416f82fc6189be2634ff
--- library/serialize/serializer.tcl	(.../serializer.tcl)	(revision 494410d936ca8f8481faa2a13447c9289e5ef7e9)
+++ library/serialize/serializer.tcl	(.../serializer.tcl)	(revision f9f501ffe3b3bd7a3843416f82fc6189be2634ff)
@@ -1038,10 +1038,11 @@
         set arglist [$o ::nsf::methods::${scope}::info::method parameter $m]
         lappend def ${:targetName} ${prefix}proc $m \
             $arglist \
-            [$o info ${prefix}body $m]
+            [$o ::nsf::methods::${scope}::info::method body $m]
         foreach p {pre post} {
-          if {[$o info ${prefix}$p $m] ne ""} {
-            lappend def [$o info ${prefix}$p $m]
+          set cond [$o ::nsf::methods::${scope}::info::method ${p}condition $m]
+          if {$cond ne ""} {
+            lappend def $cond
           }
         }
       }
Index: tests/serialize.test
===================================================================
diff -u -r6a55e4e48e5431b7b76916a8dbfb550b4cdc6edb -rf9f501ffe3b3bd7a3843416f82fc6189be2634ff
--- tests/serialize.test	(.../serialize.test)	(revision 6a55e4e48e5431b7b76916a8dbfb550b4cdc6edb)
+++ tests/serialize.test	(.../serialize.test)	(revision f9f501ffe3b3bd7a3843416f82fc6189be2634ff)
@@ -325,7 +325,16 @@
   ? {::nsf::method::property C baz debug} 1
 }
 
+
 #
+# Check serializing of info internals
+#
+package require XOTcl
+package require xotcl::serializer
+nx::test case xotcl-info-internals {
+  ? {catch {::Serializer methodSerialize ::xotcl::classInfo default ""}} 0
+}
+#
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 2