Index: openacs-4/packages/xowiki/tcl/weblog-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/weblog-procs.tcl,v diff -u -N -r1.75.2.5 -r1.75.2.6 --- openacs-4/packages/xowiki/tcl/weblog-procs.tcl 8 Mar 2019 16:14:21 -0000 1.75.2.5 +++ openacs-4/packages/xowiki/tcl/weblog-procs.tcl 8 Mar 2019 18:51:07 -0000 1.75.2.6 @@ -35,7 +35,11 @@ } { set form_item_ids [list] foreach t [split $forms |] { - if {![regexp {^/?[[:alnum:]:._-]+$} $t]} { + # + # The following regexp should include the majority of alid + # items refs. + # + if {![regexp {^[[:alnum:]:./_-]+$} $t]} { error "invalid form specificaton '$t'" } #:log "trying to get $t // parent_id $parent_id"