Removing hooks where we can from templates; one hook will probably have to stay;...
[squirrelmail.git] / plugins / squirrelspell / modules / lang_setup.mod
1 <?php
2
3 /**
4  * lang_setup.mod
5  *
6  * Squirrelspell module
7  *
8  * This module displays available dictionaries to the user and lets
9  * him/her choose which ones s/he wants to check messages with.
10  *
11  * @author Konstantin Riabitsev <icon at duke.edu>
12  * @copyright &copy; 1999-2006 The SquirrelMail Project Team
13  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
14  * @version $Id$
15  * @package plugins
16  * @subpackage squirrelspell
17  */
18
19 global $SQSPELL_APP;
20
21 $msg = '<p>'
22   . _("Please check any available international dictionaries which you would like to use when spellchecking:")
23   . '</p>'
24   . '<form method="post">'
25   . '<input type="hidden" name="MOD" value="lang_change" />'
26   . '<blockquote><p>';
27 /**
28  * Present a nice listing.
29  */
30 $langs = sqspell_getSettings();
31 $add = '<p>'
32   . _("Make this dictionary my default selection:")
33   . " <select name=\"lang_default\">\n";
34 while (list($avail_lang, $junk) = each($SQSPELL_APP)){
35   $msg .= "<input type=\"checkbox\" name=\"use_langs[]\" "
36     . "value=\"$avail_lang\"";
37   if (in_array($avail_lang, $langs)) {
38     $msg .= ' checked="checked"';
39   }
40   $msg .= ' /> ' . _($avail_lang) . "<br />\n";
41   $add .= "<option";
42   if ($avail_lang==$langs[0]) {
43     $add .= ' selected="selected"';
44   }
45   $add .= " value=\"$avail_lang\" >" . _($avail_lang) . "</option>\n";
46 }
47 $msg .= "</p>\n" . $add . "</select>\n";
48 $msg .= "</p></blockquote><p><input type=\"submit\" value=\" "
49   . _("Make these changes") . " \" /></p>";
50 sqspell_makePage(_("Add International Dictionaries"), null, $msg);
51
52 /**
53  * For Emacs weenies:
54  * Local variables:
55  * mode: php
56  * End:
57  * vim: syntax=php
58  */