add labels to make checkboxes better clickable
[squirrelmail.git] / plugins / squirrelspell / modules / lang_setup.mod
index d19afba64f3c8f4fef631fa8454334ff4935a105..8d02538e183b9dbf85399a91a9ef08916595f02c 100644 (file)
@@ -1,23 +1,23 @@
 <?php
+
 /**
  * lang_setup.mod
- * ---------------
- * Squirrelspell module
- *
- * Copyright (c) 1999-2003 The SquirrelMail development team
- * Licensed under the GNU GPL. For full terms see the file COPYING.
  *
- * This module displays available dictionaries to the user and lets 
- * him/her choose which ones s/he wants to check messages with.     
+ * Squirrelspell module
  *
- * $Id$
+ * This module displays available dictionaries to the user and lets
+ * him/her choose which ones s/he wants to check messages with.
  *
- * @author Konstantin Riabitsev <icon@duke.edu> ($Author$)
- * @version $Date$
+ * @author Konstantin Riabitsev <icon at duke.edu>
+ * @copyright &copy; 1999-2006 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
+ * @version $Id$
+ * @package plugins
+ * @subpackage squirrelspell
  */
-    
+
 global $SQSPELL_APP;
-    
+
 $msg = '<p>'
   . _("Please check any available international dictionaries which you would like to use when spellchecking:")
   . '</p>'
@@ -27,27 +27,28 @@ $msg = '<p>'
 /**
  * Present a nice listing.
  */
-$langs = sqspell_getSettings(null);
-$add = '<p>'
+$langs = sqspell_getSettings();
+$add = '<p><label for="lang_default">'
   . _("Make this dictionary my default selection:")
-  . " <select name=\"lang_default\">\n";
+  . "</label> <select name=\"lang_default\" id=\"lang_default\">\n";
 while (list($avail_lang, $junk) = each($SQSPELL_APP)){
   $msg .= "<input type=\"checkbox\" name=\"use_langs[]\" "
-    . "value=\"$avail_lang\"";
+    . "value=\"$avail_lang\" id=\"use_langs_$avail_lang\"";
   if (in_array($avail_lang, $langs)) {
-    $msg .= ' checked';
+    $msg .= ' checked="checked"';
   }
-  $msg .= ' /> ' . _($avail_lang) . "<br />\n";
+  $msg .= ' /> <label for="use_langs_' . $avail_lang . '">'
+    . _($avail_lang) . "</label><br />\n";
   $add .= "<option";
   if ($avail_lang==$langs[0]) {
-    $add .= ' selected';
+    $add .= ' selected="selected"';
   }
   $add .= " value=\"$avail_lang\" >" . _($avail_lang) . "</option>\n";
 }
 $msg .= "</p>\n" . $add . "</select>\n";
-$msg .= "</p></blockquote><p><input type=\"submit\" value=\" " 
+$msg .= "</p></blockquote><p><input type=\"submit\" value=\" "
   . _("Make these changes") . " \" /></p>";
-sqspell_makePage(_("Add International Dictionaries"), null, $msg); 
+sqspell_makePage(_("Add International Dictionaries"), null, $msg);
 
 /**
  * For Emacs weenies:
@@ -56,5 +57,3 @@ sqspell_makePage(_("Add International Dictionaries"), null, $msg);
  * End:
  * vim: syntax=php
  */
-?>
\ No newline at end of file