Index: library/xotcl/tests/slottest.xotcl
===================================================================
diff -u -r76fadfb3f603f8f96a6064f4bb5342133923ec53 -rb6d81c6521d1e1d58f00763f5ab30a0946cc222a
--- library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision 76fadfb3f603f8f96a6064f4bb5342133923ec53)
+++ library/xotcl/tests/slottest.xotcl	(.../slottest.xotcl)	(revision b6d81c6521d1e1d58f00763f5ab30a0946cc222a)
@@ -408,7 +408,7 @@
 ? {p2 salary} 1009
 
 Person slots {
-  Attribute create sex -type "sex" {
+  Attribute create sex -type "sex" -convert true {
     :method type=sex {name value} {
       #puts stderr "[self] slot specific converter"
       switch -glob $value {
@@ -421,7 +421,7 @@
 }
 Person p3 -sex male
 ? {p3 sex} m
-Person method foo {s:sex,slot=::Person::slot::sex} {return $s}
+Person method foo {s:sex,slot=::Person::slot::sex,convert} {return $s}
 ? {p3 foo male} "m"
 ? {p3 sex male} m