Index: openacs-4/packages/acs-tcl/tcl/00-icanuse-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-icanuse-procs.tcl,v
diff -u -r1.1.2.20 -r1.1.2.21
--- openacs-4/packages/acs-tcl/tcl/00-icanuse-procs.tcl	14 Jan 2021 14:17:59 -0000	1.1.2.20
+++ openacs-4/packages/acs-tcl/tcl/00-icanuse-procs.tcl	14 Jan 2021 14:32:19 -0000	1.1.2.21
@@ -59,7 +59,7 @@
     } {
         set has_p true
         if {[catch [list $cmd $subcommand] errorMsg]} {
-            if {[regexp {^unknown or ambiguous subcommand .*$} $errorMsg]} {
+            if {[regexp "^.*\"$subcommand\": must be .*\$" $errorMsg]} {
                 set has_p false
             }
         }