Index: library/mongodb/nx-mongo.tcl
===================================================================
diff -u -r5d495b6d0bd173ab082c1e3b4eb5d0d3e24c82d2 -r5ac8b0931acfe8d0ef93054dafa03f4501868d31
--- library/mongodb/nx-mongo.tcl	(.../nx-mongo.tcl)	(revision 5d495b6d0bd173ab082c1e3b4eb5d0d3e24c82d2)
+++ library/mongodb/nx-mongo.tcl	(.../nx-mongo.tcl)	(revision 5ac8b0931acfe8d0ef93054dafa03f4501868d31)
@@ -589,7 +589,7 @@
       set result [next [list -accessor $accessor -class $class \
                             -configurable $configurable -incremental=$incremental \
                             $spec $initblock]]
-      lassign [::nx::MetaSlot parseParameterSpec [self] $spec] name
+      lassign [::nx::MetaSlot parseParameterSpec -target [self] $spec] name
       [:info slots $name] configure -rep $rep
       return $result
     }
@@ -609,7 +609,7 @@
                             -configurable $configurable -incremental=$incremental \
                             -initblock $initblock $spec \
                             {*}[expr {[info exists defaultValue] ? [list $defaultValue] : ""}]]]
-      lassign [::nx::MetaSlot parseParameterSpec [self] $spec] name
+      lassign [::nx::MetaSlot parseParameterSpec -target [self] $spec] name
       [:info slots $name] configure -rep $rep
       return $result
     }
Index: library/nx/nx.tcl
===================================================================
diff -u -rc4f449cb353be812ba6502ef8e9587e87881f59b -r5ac8b0931acfe8d0ef93054dafa03f4501868d31
--- library/nx/nx.tcl	(.../nx.tcl)	(revision c4f449cb353be812ba6502ef8e9587e87881f59b)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision 5ac8b0931acfe8d0ef93054dafa03f4501868d31)
@@ -1025,7 +1025,7 @@
   MetaSlot public object method parseParameterSpec {
     {-class ""}
     {-defaultopts ""}
-    target
+    {-target ""}
     spec
     default:optional
   } {
@@ -1093,7 +1093,7 @@
     default:optional
   } {
 
-    lassign [:parseParameterSpec -class $class -defaultopts $defaultopts $target $spec] \
+    lassign [:parseParameterSpec -class $class -defaultopts $defaultopts -target $target $spec] \
 	name parameterOptions class opts
 
     lappend opts -incremental $incremental
@@ -2243,7 +2243,7 @@
     #puts stderr "Object variable $spec accessor $accessor nocomplain $nocomplain incremental $incremental"
 
     # get name and list of parameter options
-    lassign [::nx::MetaSlot parseParameterSpec -class $class [self] $spec] \
+    lassign [::nx::MetaSlot parseParameterSpec -class $class -target [self] $spec] \
 	name parameterOptions class options
     array set opts $options
 
@@ -2391,7 +2391,7 @@
       lappend defaultopts -trace $trace
     }
 
-    lassign [::nx::MetaSlot parseParameterSpec -class $class [self] $spec] \
+    lassign [::nx::MetaSlot parseParameterSpec -class $class -target [self] $spec] \
                pname parameterOptions _ _
 
     set paramOptsList [split $parameterOptions ,]