[SM-CVS] SF.net SVN: squirrelmail:[14686] trunk/squirrelmail/plugins/squirrelspell

[Paul Lesniewski via squirrelmail-cvs]

Revision: 14686
http://sourceforge.net/p/squirrelmail/code/14686
Author: pdontthink
Date: 2017-06-17 20:23:12 +0000 (Sat, 17 Jun 2017)
Log Message:
-----------
Add ability to control the display of the "Check Spelling" button. Allows administrators to offer this plugin but keep it out of the way for users who do not want it. Put sqspell_show_button=0 in default preferences if it should be hidden by default.

Modified Paths:
--------------
trunk/squirrelmail/plugins/squirrelspell/modules/options_main.mod
trunk/squirrelmail/plugins/squirrelspell/sqspell_functions.php

Added Paths:
-----------
trunk/squirrelmail/plugins/squirrelspell/modules/change_main_options.mod

Added: trunk/squirrelmail/plugins/squirrelspell/modules/change_main_options.mod
===================================================================
--- trunk/squirrelmail/plugins/squirrelspell/modules/change_main_options.mod (rev 0)
+++ trunk/squirrelmail/plugins/squirrelspell/modules/change_main_options.mod 2017-06-17 20:23:12 UTC (rev 14686)
@@ -0,0 +1,55 @@
+<?php
+/**
+ * change_main_options.mod
+ * -----------------------
+ * Squirrelspell module
+ *
+ * Copyright (c) 1999-2017 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * This module changes the international dictionaries selection
+ * for the user. Called after LANG_SETUP module.
+ *
+ * @author Paul Lesniewski <***@squirrelmail.org>
+ * @version $Id: lang_change.mod 14642 2017-01-27 20:31:33Z pdontthink $
+ * @package plugins
+ * @subpackage squirrelspell
+ */
+
+if (!sqgetGlobalVar('smtoken',$submitted_token, SQ_POST)) {
+ $submitted_token = '';
+}
+sm_validate_security_token($submitted_token, -1, TRUE);
+
+$main_options_changed_message = '<p><strong>';
+
+if (sqgetGlobalVar('sqspell_show_button', $sqspell_show_button, SQ_POST)
+ && !empty($sqspell_show_button))
+{
+ $sqspell_show_button = 1;
+ $main_options_changed_message .= sprintf(_("Settings changed: Set to show \"%s\" button"), _("Check Spelling"));
+}
+else
+{
+ $sqspell_show_button = 0;
+ $main_options_changed_message .= sprintf(_("Settings changed: Set to hide \"%s\" button"), _("Check Spelling"));
+}
+
+$main_options_changed_message .= '</strong></p>';
+
+setPref($data_dir, $username, 'sqspell_show_button', $sqspell_show_button);
+
+// so far the only thing this file does is change a checkbox,
+// so for now we can skip the confirmation page and just reload
+// the changed main options page (with a simple confirmation message)
+//
+require(SM_PATH . 'plugins/squirrelspell/modules/options_main.mod');
+
+/**
+ * For Emacs weenies:
+ * Local variables:
+ * mode: php
+ * End:
+ * vim: syntax=php
+ */
+

Modified: trunk/squirrelmail/plugins/squirrelspell/modules/options_main.mod
===================================================================
--- trunk/squirrelmail/plugins/squirrelspell/modules/options_main.mod 2017-06-17 20:22:47 UTC (rev 14685)
+++ trunk/squirrelmail/plugins/squirrelspell/modules/options_main.mod 2017-06-17 20:23:12 UTC (rev 14686)
@@ -15,8 +15,14 @@
* @subpackage squirrelspell
*/

-global $SQSPELL_APP;
-$msg = '<p>'
+global $SQSPELL_APP, $main_options_changed_message;
+
+if (!empty($main_options_changed_message))
+ $msg = $main_options_changed_message;
+else
+ $msg = '';
+
+$msg .= '<p>'
. _("Please choose which options you wish to set up:")
. '</p>'
. '<ul>'
@@ -46,6 +52,27 @@
. '</li>';
}
$msg .= "</ul>\n";
+
+
+
+// add checkbox to enable/disable the spellcheck button on compose screen
+//
+$sqspell_show_button = getPref($data_dir, $username, 'sqspell_show_button', 1);
+$msg .= '<form method="post">'
+ . '<input type="hidden" name="MOD" value="change_main_options" />'
+ . '<input type="hidden" name="smtoken" value="' . sm_generate_security_token() . '" />'
+ . '<p>'
+ . '<input type="checkbox" id="sqspell_show_button" name="sqspell_show_button" value="1"';
+if ($sqspell_show_button) {
+ $msg .= ' checked="checked"';
+}
+$msg .= ' /><label for="sqspell_show_button"> '
+ . sprintf(_("Show \"%s\" button when composing"), _("Check Spelling"))
+ . "</label>\n";
+$msg .= " <input type=\"submit\" value=\" "
+ . _("Make these changes") . " \" /></p></form>";
+
+
sqspell_makePage( _("SquirrelSpell Options Menu"), null, $msg);

/**

Modified: trunk/squirrelmail/plugins/squirrelspell/sqspell_functions.php
===================================================================
--- trunk/squirrelmail/plugins/squirrelspell/sqspell_functions.php 2017-06-17 20:22:47 UTC (rev 14685)
+++ trunk/squirrelmail/plugins/squirrelspell/sqspell_functions.php 2017-06-17 20:23:12 UTC (rev 14686)
@@ -57,11 +57,15 @@
* @return void
*/
function squirrelspell_setup_function() {
+
+ global $data_dir, $username;
+ $sqspell_show_button = getPref($data_dir, $username, 'sqspell_show_button', 1);
+
/**
* Check if this browser is capable of displaying SquirrelSpell
* correctly.
*/
- if (checkForJavascript()) {
+ if ($sqspell_show_button && checkForJavascript()) {

global $oTemplate, $base_uri, $nbsp;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.