Index: library/nx/nx.tcl
===================================================================
diff -u -r97e0a189f00e655455aa3a48e44ab61f700eab58 -rf16f3e488107e6a3eb6dc754ad56c7db8cdc35de
--- library/nx/nx.tcl	(.../nx.tcl)	(revision 97e0a189f00e655455aa3a48e44ab61f700eab58)
+++ library/nx/nx.tcl	(.../nx.tcl)	(revision f16f3e488107e6a3eb6dc754ad56c7db8cdc35de)
@@ -1422,7 +1422,7 @@
 	lappend options [expr {[::nsf::is metaclass $type] ? "class" : "object"}] type=$type
       } else {
 	lappend options $type
-	if {$type ni [list "" "switch" \
+	if {$type ni [list "" \
 			     "boolean" "integer" "object" "class" \
 			     "metaclass" "baseclass" "parameter" \
 			     "alnum" "alpha" "ascii" "control" "digit" "double" \