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.2 -r1.3
--- openacs-4/packages/forums/tcl/messages-format-procs.tcl	22 Sep 2003 20:37:06 -0000	1.2
+++ openacs-4/packages/forums/tcl/messages-format-procs.tcl	22 Sep 2003 20:46:04 -0000	1.3
@@ -17,6 +17,9 @@
         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" 
             ";-)" "wink"
Index: openacs-4/packages/forums/www/doc/emoticons.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/doc/emoticons.adp,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/forums/www/doc/emoticons.adp	22 Sep 2003 20:46:04 -0000	1.1
@@ -0,0 +1,41 @@
+<master>
+
+Currently the following emoticons (smileys) are available:
+
+<table>
+  <tr>
+    <td>:-)</td><td><img src="/resources/forums/smile.gif"></td>
+  </tr>
+  <tr>
+    <td>;-)</td>
+    <td><img src="/resources/forums/wink.gif"></td>
+  </tr>
+  <tr>    
+   <td>:-D</td>
+   <td><img src="/resources/forums/bigsmile.gif"></td>
+  </tr>
+  <tr>
+    <td>8-)</td>
+   <td><img src="/resources/forums/smile8.gif"></td>
+  </tr>
+  <tr>
+    <td>:-(</td>
+    <td><img src="/resources/forums/sad.gif"></td>
+  </tr>
+  <tr>
+    <td>;-(</td>
+    <td><img src="/resources/forums/cry.gif"></td>
+  </tr>
+  <tr>
+    <td>:-O</td>
+    <td><img src="/resources/forums/scream.gif"></td>
+  </tr>
+  <tr>
+    <td>:-/</td>
+    <td><img src="/resources/forums/think.gif"></td>
+  </tr>
+</table>
+
+The listed smileys (e.g. ;-) ) will be automatically replaced with an
+image if the package parameter DisplayEmoticonsAsImagesP is set to 1
+(1 by default).