Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -r1.279.2.1 -r1.279.2.2
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	29 Sep 2013 19:32:43 -0000	1.279.2.1
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	30 Sep 2013 11:37:18 -0000	1.279.2.2
@@ -2234,7 +2234,7 @@
   Class ParameterCache
   ParameterCache instproc get_parameter {{-check_query_parameter true}  {-type ""} attribute {default ""}} {
     set key [list [my id] [self proc] $attribute]
-    if {[info command "::xo::cc"] ne ""} {
+    if {[info commands "::xo::cc"] ne ""} {
       if {[::xo::cc cache_exists $key]} {
         return [::xo::cc cache_get $key]
       }