(ispell-dictionary-alist-2): Removed svenska,

renamed svenska8 to svenska, and fixed and extended CASECHARS
for it.

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 407bf471afbe53b43c1b68e26b3d62d226de3e64..a23985623e3692da74af31af7691af17753a3098 100644 (file)
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -443,12 +443,9 @@ for language-specific arguments."
      "[\341\342\367\347\344\345\263\366\372\351\352\353\354\355\356\357\360\362\363\364\365\346\350\343\376\373\375\370\371\377\374\340\361\301\302\327\307\304\305\243\326\332\311\312\313\314\315\316\317\320\322\323\324\325\306\310\303\336\333\335\330\331\337\334\300\321]"
      "[^\341\342\367\347\344\345\263\366\372\351\352\353\354\355\356\357\360\362\363\364\365\346\350\343\376\373\375\370\371\377\374\340\361\301\302\327\307\304\305\243\326\332\311\312\313\314\315\316\317\320\322\323\324\325\306\310\303\336\333\335\330\331\337\334\300\321]"
      "[']" t ("-C" "-d" "russian") "~latin1" iso-latin-1)
-    ("svenska"                         ;7 bit Swedish mode
-     "[A-Za-z}{|\\133\\135\\\\]" "[^A-Za-z}{|\\133\\135\\\\]"
-     "[']" nil ("-C") nil nil)
-    ("svenska8"                                ;8 bit Swedish mode
-     "[A-Za-z\345\344\366\305\304\366]"  "[^A-Za-z\345\344\366\305\304\366]"
-     "[']" nil ("-C" "-d" "svenska") "~list" ; Add `"-T" "list"' instead?
+    ("svenska"
+     "[A-Za-z\345\344\366\351\340\374\350\346\370\347\305\304\326\311\300\334\310\306\330\307]"  "[^A-Za-z\345\344\366\351\340\374\350\346\370\347\305\304\326\311\300\334\310\306\330\307]"
+     "[']" nil ("-C") "~list" ; Add `"-T" "list"' instead?
      iso-latin-1))
   "Second half of dictionary, shortened for loaddefs.el")