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 -N -r1.93.2.69 -r1.93.2.70
--- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	15 Feb 2024 17:36:55 -0000	1.93.2.69
+++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl	23 Feb 2024 12:58:27 -0000	1.93.2.70
@@ -134,7 +134,7 @@
         error "value '$value' of parameter $name is invalid"
       }
     }
-    :method type=dbtext {name value arg} {
+    :method type=dbtext {name value} {
       #
       # Ensure that the value can be used in an SQL query.
       #