Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v diff -u -r1.98.2.18 -r1.98.2.19 --- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl 6 Aug 2024 09:43:17 -0000 1.98.2.18 +++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl 27 Aug 2024 13:20:11 -0000 1.98.2.19 @@ -1370,23 +1370,6 @@ } set hashed_password [ns_sha1 "$password$salt"] - ns_log notice "CALL acs_user__new(:person_id, --user_id - 'user', --object_type - now(), --creation_date - null, --creation_user - null, --creation_ip - null, --authority_id - :username, --username - null, --email - null, --url - :first_names, --first_names - :last_name, --last_name - :hashed_password, --password - :salt, --salt - null, --screen_name - 't', --email_verified_p - null --context_id - )" db_exec_plsql noxql { SELECT acs_user__new(:person_id, --user_id 'user', --object_type Index: openacs-4/packages/acs-tcl/tcl/test/text-html-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/text-html-procs.tcl,v diff -u -r1.11.2.20 -r1.11.2.21 --- openacs-4/packages/acs-tcl/tcl/test/text-html-procs.tcl 18 Jul 2024 07:54:32 -0000 1.11.2.20 +++ openacs-4/packages/acs-tcl/tcl/test/text-html-procs.tcl 27 Aug 2024 13:20:30 -0000 1.11.2.21 @@ -904,8 +904,8 @@ set string "\n\r\t \na word \'\n\n \t\"\" aaaaa\' \'\'\'\b \v\v\v \f" set expected {\n\r\t \na word \'\n\n \t\"\" aaaaa\' \'\'\'\b \v\v\v \f} - ns_log notice EXP:<$expected> - ns_log notice GOT:<[ad_js_escape $string]> + #ns_log notice EXP:<$expected> + #ns_log notice GOT:<[ad_js_escape $string]> aa_true " - String of escape sequences, quotes and text (with some quotes already escaped)" \ {[ad_js_escape $string] eq $expected}