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