Index: library/serialize/serializer.tcl
===================================================================
diff -u -rf31c1a01c6a389f693b8db0f2204cbb46180fef1 -r2f76d3a1a45f2ae2087d547c41bfa5d8f5bd3298
--- library/serialize/serializer.tcl	(.../serializer.tcl)	(revision f31c1a01c6a389f693b8db0f2204cbb46180fef1)
+++ library/serialize/serializer.tcl	(.../serializer.tcl)	(revision 2f76d3a1a45f2ae2087d547c41bfa5d8f5bd3298)
@@ -780,7 +780,12 @@
     :public object method serializeExportedMethod {object kind name s} {
       # todo: object modifier is missing
       set :targetName $object
-      return [:method-serialize $object $name "" $s]
+      if {$kind eq "inst"} {
+        set modifier ""
+      } else {
+        set modifier "object"
+      }
+      return [:method-serialize $object $name $modifier $s]
     }
 
     :object method method-serialize {o m modifier s} {