Index: library/xotcl/tests/slottest.xotcl
===================================================================
diff -u -rbd1cce484140aaf66113cf647f060ae48d32b24f -rfc36bf33edd6f5b3f273cb2abdcb30f2ececdff4
--- library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision bd1cce484140aaf66113cf647f060ae48d32b24f)
+++ library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision fc36bf33edd6f5b3f273cb2abdcb30f2ececdff4)
@@ -1,5 +1,5 @@
 # -*- Tcl -*-
-package require XOTcl; namespace import ::xotcl::*
+package require XOTcl; namespace import -force ::xotcl::*
 package require nx::test
 
 Test parameter count 1000
@@ -112,7 +112,8 @@
 ? {o1 class} "::O"
 o1 class Object
 ? {o1 class} "::xotcl::Object"
-? {catch {o1 class add M}} 1
+? {o1 objectparameter} "-mixin:alias -filter:alias -class:alias args"
+? {o1 class add M} {class: expected a class but got "::o1"}
 
 
 ? {O superclass} "::xotcl::Object"