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.77 -r1.78 --- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 3 Mar 2018 20:42:33 -0000 1.77 +++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 4 Mar 2018 14:03:57 -0000 1.78 @@ -1856,7 +1856,11 @@ # #################### -if {![info commands ns_reflow_text] ne ""} { +if {[info commands ns_reflow_text] eq ""} { + # + # Define compatibility function for those implementations, that do + # not have the built-in version of NaviServer + # ad_proc ns_reflow_text {{-width 80} {-prefix ""} input} { Reflow a plain text to the given width and prefix every line