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.36.2.36 -r1.36.2.37 --- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 21 Apr 2017 14:22:46 -0000 1.36.2.36 +++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 21 Apr 2017 14:24:57 -0000 1.36.2.37 @@ -769,7 +769,7 @@ if { ![info exists validate] } { set validate [list] - }d + } set validate_len [llength $validate] for { set i 0 } { $i < $validate_len } { incr i } {