Index: openacs-4/packages/forums/tcl/messages-format-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-format-procs.tcl,v diff -u -r1.7 -r1.7.2.1 --- openacs-4/packages/forums/tcl/messages-format-procs.tcl 7 Aug 2017 23:48:11 -0000 1.7 +++ openacs-4/packages/forums/tcl/messages-format-procs.tcl 20 Mar 2023 15:35:59 -0000 1.7.2.1 @@ -5,7 +5,7 @@ namespace eval forum::format { ad_proc -public reply_subject { parent_subject } { - + Generates a subject string for a reply to an existing message. The prefix is always added using the system-wide locale to avoid @@ -21,29 +21,29 @@ regsub "^($prefix)+" $parent_subject {} parent_subject set subject [concat $prefix $parent_subject] - + return $subject } ad_proc emoticons { {-content:required} } { - Convert smileys (emoticons) to img references. It constructs a relative + Convert smileys (emoticons) to img references. It constructs a relative image reference to graphics/imagename.gif, so it will only work when used from pages that are directly under the forums/www/ directory.

- If you change the images make sure to also adapt the image sizes in + If you change the images make sure to also adapt the image sizes in the img tag that gets constructed here. } { set emoticons_map [list] # if you change this list, consider changing # www/doc/emoticons.adp as well foreach { emoticon image } { - ":-)" "smile" + ":-)" "smile" ";-)" "wink" ":-D" "bigsmile" "8-)" "smile8"