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.36.2.14 -r1.36.2.15 --- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 11 Oct 2015 18:09:02 -0000 1.36.2.14 +++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 19 Oct 2015 08:38:39 -0000 1.36.2.15 @@ -2096,13 +2096,13 @@ ad_page_contract_filter token { name value } { Checks whether the value is a Tcl word, or contains a few - rather safe other characters (",", "-") used e.g. in orderby. + rather safe other characters (".", ",", "-") used e.g. in orderby. @author Gustaf Neumann @creation-date 24 June 2015 } { - if {[regexp {^[\w,: -]+$} $value]} { + if {[regexp {^[\w.,: -]+$} $value]} { return 1 } ad_complain [_ acs-tcl.lt_name_contains_invalid]