<?php
+
/**
* lang_change.mod
- * ----------------
- * Squirrelspell module
*
- * Copyright (c) 1999-2005 The SquirrelMail Project Team
- * Licensed under the GNU GPL. For full terms see the file COPYING.
+ * Squirrelspell module
*
* This module changes the international dictionaries selection
* for the user. Called after LANG_SETUP module.
*
- * @author Konstantin Riabitsev <icon@duke.edu>
+ * @author Konstantin Riabitsev <icon at duke.edu>
+ * @copyright 1999-2012 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
* @version $Id$
* @package plugins
* @subpackage squirrelspell
*/
+sqgetGlobalVar('smtoken', $submitted_token, SQ_POST, '');
+sm_validate_security_token($submitted_token, 3600, TRUE);
+
global $SQSPELL_APP_DEFAULT;
if (! sqgetGlobalVar('use_langs',$use_langs,SQ_POST)) {
if (sizeof($new_langs)>1) {
$dsp_string = '';
foreach( $new_langs as $a) {
- $dsp_string .= _(trim($a)) . ', ';
+ $dsp_string .= _(htmlspecialchars(trim($a))) . _(", ");
}
// remove last comma and space
$dsp_string = substr( $dsp_string, 0, -2 );
- /**
- * i18n: first %s is comma separated list of languages, second %s - default language.
- * Language names are translated, if they are present in squirrelmail.po file.
- * make sure that you don't use html codes in language name translations
- */
+ // i18n: first %s is comma separated list of languages, second %s - default language.
+ // Language names are translated, if they are present in squirrelmail.po file.
+ // make sure that you don't use html codes in language name translations
$msg = '<p>'
. sprintf(_("Settings adjusted to: %s with %s as default dictionary."),
'<strong>'.htmlspecialchars($dsp_string).'</strong>',
sqspell_saveSettings($new_langs);
sqspell_makePage(_("International Dictionaries Preferences Updated"),
- null, $msg);
+ null, $msg);
/**
* For Emacs weenies:
* End:
* vim: syntax=php
*/
-?>
\ No newline at end of file