Index: library/lib/nxdoc-dc.tcl
===================================================================
diff -u -r187fbd20a453ae9d73e9b48f88b8d6a8c79685c2 -re0f9892926cd7c2c3bf54a1e7d1d945a5c77e7ca
--- library/lib/nxdoc-dc.tcl	(.../nxdoc-dc.tcl)	(revision 187fbd20a453ae9d73e9b48f88b8d6a8c79685c2)
+++ library/lib/nxdoc-dc.tcl	(.../nxdoc-dc.tcl)	(revision e0f9892926cd7c2c3bf54a1e7d1d945a5c77e7ca)
@@ -535,10 +535,10 @@
       :public method assign {domain prop value} {
 	set current_entity [$domain current_entity]
 	set scope [expr {[$current_entity info is class]?"class":""}]
-	if {[$domain eval [list info exists :$prop]] && [:get $domain $prop] in [$current_entity {*}$scope info mixin classes]} {
-	  $current_entity {*}$scope mixin delete [:get $domain $prop]
+	if {[$domain eval [list info exists :$prop]] && [:get $domain $prop] in [$current_entity eval [list : -system {*}$scope info mixin classes]]} {
+	  $current_entity eval [list : -system {*}$scope mixin delete [:get $domain $prop]]
 	}
-	$current_entity {*}$scope mixin add [next [list $domain $prop $value]]
+	$current_entity eval [list : -system {*}$scope mixin add [next [list $domain $prop $value]]]
       }
     }
     :property current_entity:object
@@ -737,7 +737,7 @@
     :method parse@tag {line} {
       lassign [apply [[current class] eval {set :lineproc}] {*}$line] tag line
       #set line [lassign [apply [[current class] eval {set :lineproc}] {*}$line] tag]
-      if {[:info lookup methods -source application $tag] eq ""} {
+      if {[: -system info lookup methods -source application $tag] eq ""} {
 	set msg "The tag '$tag' is not supported for the entity type '[namespace tail [:info class]]"
 	${:block_parser} cancel INVALIDTAG $msg
       }
@@ -866,7 +866,7 @@
 
 	    set entity [@$leaf(axis) new -name $leaf(name) {*}$args]
 	  } else {
-	    if {[$entity info lookup methods -source application @$leaf(axis)] eq ""} {
+	    if {[$entity eval [list : -system info lookup methods -source application @$leaf(axis)]] eq ""} {
 	      ${:block_parser} cancel INVALIDTAG \
 		  "The tag '$leaf(axis)' is not supported for the entity type '[namespace tail [$entity info class]]'"
 	    }