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 -N -r1.30.2.19 -r1.30.2.20 --- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 24 Jun 2015 09:23:10 -0000 1.30.2.19 +++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 2 Jul 2015 19:16:02 -0000 1.30.2.20 @@ -1138,7 +1138,7 @@ foreach elm [ad_complaints_get_list] { template::multirow append complaints $elm } - ns_return 200 text/html [ad_parse_template -params [list complaints] "/packages/acs-tcl/lib/complain"] + ns_return 422 text/html [ad_parse_template -params [list complaints] "/packages/acs-tcl/lib/complain"] ad_script_abort } } @@ -2006,7 +2006,7 @@ @creation-date 24 June 2015 } { - if {[regexp {^[\w,-]+$} $value]} { + if {[regexp {^[\w,:-]+$} $value]} { return 1 } ad_complain [_ acs-tcl.lt_name_contains_invalid]