Index: openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl,v diff -u -r1.65 -r1.66 --- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl 1 Nov 2012 23:06:56 -0000 1.65 +++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl 2 Nov 2012 11:42:15 -0000 1.66 @@ -1,6 +1,13 @@ ## tell serializer to export methods, although these are methods of # ::xotcl::Object +if {$::tcl_version < 8.5 + || ([regexp {8[.]5[.]([0-9]+)$} $::tcl_patchLevel _ minor] && $minor < 4) +} { + ns_log error "We require for this version of xotcl-core at least Tcl 8.5.4 (avail: Tcl $::tcl_patchLevel)" + return +} + package require xotcl::serializer ::Serializer exportMethods {