Index: library/serialize/serializer.tcl =================================================================== diff -u -rc5d841d4cd001b85e95e01202b4fc0afe75df6a8 -r6d8e3872bf20cb1ec9ede91101daff85548a46e9 --- library/serialize/serializer.tcl (.../serializer.tcl) (revision c5d841d4cd001b85e95e01202b4fc0afe75df6a8) +++ library/serialize/serializer.tcl (.../serializer.tcl) (revision 6d8e3872bf20cb1ec9ede91101daff85548a46e9) @@ -887,7 +887,7 @@ # provide limited support for exporting aliases for XOTcl objects foreach i [$o ::nsf::methods::class::info::methods -methodtype alias -callprotection all] { set nxDef [$o ::nsf::methods::class::info::method definition $i] - append cmd [list ::nsf::alias $o {*}[lrange $nxDef 2 end]\n + append cmd [list ::nsf::alias $o {*}[lrange $nxDef 3 end]]\n } append cmd \ [:frameWorkCmd ::nsf::relation $o superclass -unless ${:rootClass}] \