Index: library/lib/doc-tools.tcl
===================================================================
diff -u -r3754364287df2dfdf79b81dfa69224eae19cf691 -r3c7222644fc726717f54ffe8292acb80996e29e0
--- library/lib/doc-tools.tcl	(.../doc-tools.tcl)	(revision 3754364287df2dfdf79b81dfa69224eae19cf691)
+++ library/lib/doc-tools.tcl	(.../doc-tools.tcl)	(revision 3c7222644fc726717f54ffe8292acb80996e29e0)
@@ -552,7 +552,7 @@
 	    # requested (from the part_attribute) applicable to the
 	    # partof object, which is the object behind [$domain name]?
 	    if {[info exists :scope] && 
-		![::nsf::objectproperty name [$domain] ${:scope}]} {
+		![::nsf::objectproperty ${:scope} [$domain name]]} {
 	      error "The entity '[$domain name]' does not qualify as '${:scope}'"
 	    }
 	    next
@@ -1950,7 +1950,7 @@
 	:method parse@tag {line} {
 	  puts stderr "PART parse@tag [current]"
 	  set r [next]
-	  if {[::nsf::objectproperty object $r] && [$r info has type ::nx::doc::Entity]} {
+	  if {[::nsf::isobject $r] && [$r info has type ::nx::doc::Entity]} {
 	    set :current_part $r
 	  }
 	  return $r