Index: openacs-4/packages/acs-lang/www/admin/lookups-include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/lookups-include.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/acs-lang/www/admin/lookups-include.tcl 3 Dec 2002 17:27:23 -0000 1.1
+++ openacs-4/packages/acs-lang/www/admin/lookups-include.tcl 13 Dec 2002 12:57:52 -0000 1.2
@@ -7,7 +7,7 @@
global errorInfo
regexp "^(.*)child process exited abnormally" $errorInfo match message_key_context
set message_key_context [ad_quotehtml $message_key_context]
- regsub -all "${full_key_pattern}" $message_key_context {\1} message_key_context
+ regsub -all "${full_key_pattern}" $message_key_context {\0} message_key_context
}
ns_log Notice "PM debug $message_key_context"