Index: openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl,v
diff -u -r1.61.2.40 -r1.61.2.41
--- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	15 Feb 2024 12:27:30 -0000	1.61.2.40
+++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl	15 Feb 2024 18:04:04 -0000	1.61.2.41
@@ -1980,7 +1980,7 @@
     #
     # Reject the NUL character
     #
-    if {[regexp \u00 $value]} {
+    if {[string first \u00 $value] != -1} {
         ad_complain [_ acs-tcl.lt_name_contains_invalid]
         return 0
     }
@@ -1996,7 +1996,8 @@
     #
     # Reject the NUL character
     #
-    if {[regexp \u00 $value]} {
+    if {[string first \u00 $value] != -1} {
+        ns_log notice "--- found NUL"
         ad_complain [_ acs-tcl.lt_name_contains_invalid]
         return 0
     }