diff --git a/www/extras/htmlArea/editor.js b/www/extras/htmlArea/editor.js
index ee0a84ff1..ed76f80ef 100644
--- a/www/extras/htmlArea/editor.js
+++ b/www/extras/htmlArea/editor.js
@@ -49,6 +49,7 @@ this.toolbar = [
['forecolor','backcolor','separator'],
['HorizontalRule','Createlink','InsertImage','InsertTable','htmlmode','separator'],
['Macros','separator'],
+ ['Smileys','separator'],
// ['custom1','custom2','custom3','separator'],
['popupeditor']]; //,'about']];
@@ -83,6 +84,7 @@ this.fontstyles = [ // make sure these exist in the header of page the conte
this.btnList = {
// buttonName: commandID, title, onclick, image,
+ "smileys": ['Smileys', 'Insert Smiley', 'editor_action(this.id)', 'ed_smiley.gif'],
"bold": ['Bold', 'Bold', 'editor_action(this.id)', 'ed_format_bold.gif'],
"italic": ['Italic', 'Italic', 'editor_action(this.id)', 'ed_format_italic.gif'],
"underline": ['Underline', 'Underline', 'editor_action(this.id)', 'ed_format_underline.gif'],
@@ -309,6 +311,14 @@ function editor_action(button_id) {
//
// CUSTOM BUTTONS START HERE
//
+ // Insert a smiley
+ else if (cmdID == 'Smileys') { // insert some text from a popup window
+ var myTitle = "Insert a Smiley";
+ var myText = showModalDialog(_editor_url + "popups/insert_smiley.pl",
+ myTitle, // str or obj specified here can be read from dialog as "window.dialogArguments"
+ "resizable: yes; help: no; status: no; scroll: yes; ");
+ if (myText) { editor_insertHTML(objname, myText); }
+ }
// Custom1
else if (cmdID == 'custom1') {
diff --git a/www/extras/htmlArea/images/ed_smiley.gif b/www/extras/htmlArea/images/ed_smiley.gif
new file mode 100644
index 000000000..2881b7e0b
Binary files /dev/null and b/www/extras/htmlArea/images/ed_smiley.gif differ
diff --git a/www/extras/htmlArea/popups/insert_smiley.pl b/www/extras/htmlArea/popups/insert_smiley.pl
new file mode 100755
index 000000000..658ff44ca
--- /dev/null
+++ b/www/extras/htmlArea/popups/insert_smiley.pl
@@ -0,0 +1,76 @@
+#!/usr/bin/perl -w
+
+use strict;
+
+my ($httpSmileysPath, $fileSmileysPath, @smileys, $smile, $pos, $columns);
+
+# $fileSmileysPath = '/home/WebGUI/www/extras/smileys'; # Define this if you're having problems determinating
+ # the path to the smileys dir automaticcally.
+
+$httpSmileysPath = "/extras/smileys"; # Web path to the smileys dir
+$columns = 3; # Smileys column width
+
+# ------------------------------------------------------------------------------------------
+
+if(defined($ENV{SCRIPT_FILENAME}) && $fileSmileysPath eq '') {
+ $fileSmileysPath = $ENV{SCRIPT_FILENAME};
+ $fileSmileysPath =~ s#(/[^/]+){3}$##; # Two dirs up from this script level
+ $fileSmileysPath .= "/smileys";
+}
+
+print <
+
+
+
+ Insert Smileys
+
+
+
+
+
+
+
+
+
+