Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v diff -u -N -r1.109.2.6 -r1.109.2.7 --- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 4 Jul 2019 14:14:25 -0000 1.109.2.6 +++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 10 Aug 2019 14:33:26 -0000 1.109.2.7 @@ -1504,7 +1504,7 @@ set string_delimiter [string index $html $string_delimiter_idx] # If the greater than sign appears before any of the - # string delimters, we've found the tag end. + # string delimiters, we've found the tag end. if { $gt_idx < $string_delimiter_idx || $string_delimiter_idx == -1 } { # we found the tag end set i $gt_idx @@ -2465,7 +2465,7 @@ value must be an integer > 0. @arg padstring string that will be repeated until length of - supplied string is equal or greather than length. + supplied string is equal or greater than length. @return padded string } {