add labels to make checkboxes better clickable

plugins/squirrelspell/modules/edit_dic.mod

@@ -61,8 +61,9 @@ foreach ($langs as $lang) {
         $msg .= "</td><td valign=\"top\">\n";
       }
       $msg .= "<input type=\"checkbox\" name=\"words_ary[]\" "
-        . 'value="'.htmlspecialchars($lang_words[$j]). '" /> '
-        . htmlspecialchars($lang_words[$j]) . "<br />\n";
+        . 'value="'.htmlspecialchars($lang_words[$j]). '" id="words_ary_'
+        . $j . '" /> <label for="words_ary_' . $j .'">'
+        . htmlspecialchars($lang_words[$j]) . "</label><br />\n";
     }
     $msg .= '</td></tr></table></td></tr>'
       . "<tr bgcolor=\"$color[0]\" align=\"center\"><td>"

plugins/squirrelspell/modules/enc_setup.mod

@@ -61,9 +61,9 @@ if ($crypted){
         . '<form method="post" onsubmit="return checkMe()">'
         . '<input type="hidden" name="MOD" value="crypto" />'
         . '<p align="center"><input type="checkbox" name="action" '
-        . 'value="decrypt" /> '
+        . 'value="decrypt" id="action_decrypt" /> <label for="action_decrypt">'
         . _("Please decrypt my personal dictionary and store it in a clear-text format." )
-        . '</p>'
+        . '</label></p>'
         . '<p align="center"><input type="submit" value=" '
         . _("Change crypto settings")
         . ' " /></p>'
@@ -86,9 +86,9 @@ if ($crypted){
         . '<form method="post" onsubmit="return checkMe()">'
         . '<input type="hidden" name="MOD" value="crypto" />'
         . '<p align="center"><input type="checkbox" name="action" '
-        . 'value="encrypt" /> '
+        . 'value="encrypt" id="action_encrypt" /> <label for="action_encrypt">'
         . _("Please encrypt my personal dictionary and store it in an encrypted format.")
-        . '</p>'
+        . '</label></p>'
         . '<p align="center"><input type="submit" value=" '
         . _("Change crypto settings") . ' " /></p>'
         . '</form>';

plugins/squirrelspell/modules/lang_setup.mod

@@ -28,16 +28,17 @@ $msg = '<p>'
  * Present a nice listing.
  */
 $langs = sqspell_getSettings();
-$add = '<p>'
+$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="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="selected"';

plugins/squirrelspell/sqspell_functions.php

@@ -864,10 +864,12 @@ function sqspell_handle_crypt_panic($lang=false) {
        '<input type="hidden" name="dict_lang" value="'.htmlspecialchars($lang).'" />' :
        '<input type="hidden" name="old_setup" value="yes" />')
     . html_tag( 'p',  "\n" .
-        '<input type="checkbox" name="delete_words" value="ON" />'
-        . _("Delete my dictionary and start a new one") . '<br />'
+        '<input type="checkbox" name="delete_words" value="ON" id="delete_words" />'
+        . '<label for="delete_words">'
+        . _("Delete my dictionary and start a new one")
+        . '</label><br /><label for="old_key">'
         . _("Decrypt my dictionary with my old password:")
-        . '<input name="old_key" size="10" />' ,
+        . '</label><input type="text" name="old_key" id="old_key" size="10" />' ,
         'left' ) . "\n"
         . '</blockquote>' . "\n"
         . html_tag( 'p', "\n"