Prefer iso-8859-15 to iso-8859-6 and so on.

ChangeLog

@@ -1,3 +1,11 @@
+2014-05-27  Juliusz Chroboczek  <jch@pps.univ-paris-diderot.fr>
+
+	* mcs-e20.el (charsets-mime-charset-alist): Prefer iso-8859-15 to
+	iso-8859-6 and so on.
+	Cf. https://github.com/wanderlust/wanderlust/issues/56
+
+	* mcs-xm.el (charsets-mime-charset-alist): Likewise.
+
 2014-03-15  Kazuhiro Ito  <kzhr@d1.dion.ne.jp>
 
 	* install.el (install-prefix): Minor refactoring.

mcs-e20.el

@@ -73,6 +73,8 @@
      ((ascii latin-iso8859-2)				. iso-8859-2)
      ((ascii latin-iso8859-3)				. iso-8859-3)
      ((ascii latin-iso8859-4)				. iso-8859-4)
+     ,(if (find-coding-system 'iso-8859-15)
+	  '((ascii latin-iso8859-15)			. iso-8859-15))
      ;;((ascii cyrillic-iso8859-5)			. iso-8859-5)
      ((ascii cyrillic-iso8859-5)			. koi8-r)
      ((ascii arabic-iso8859-6)				. iso-8859-6)
@@ -81,8 +83,6 @@
      ((ascii latin-iso8859-9)				. iso-8859-9)
      ,(if (find-coding-system 'iso-8859-14)
 	  '((ascii latin-iso8859-14)			. iso-8859-14))
-     ,(if (find-coding-system 'iso-8859-15)
-	  '((ascii latin-iso8859-15)			. iso-8859-15))
      ((ascii latin-jisx0201
 	     japanese-jisx0208-1978 japanese-jisx0208)	. iso-2022-jp)
      ((ascii latin-jisx0201

mcs-xm.el

@@ -110,6 +110,8 @@
      ((ascii latin-iso8859-2)				. iso-8859-2)
      ((ascii latin-iso8859-3)				. iso-8859-3)
      ((ascii latin-iso8859-4)				. iso-8859-4)
+     ,(if (find-coding-system 'iso-8859-15)
+	  '((ascii latin-iso8859-15)			. iso-8859-15))
      ((ascii cyrillic-iso8859-5)			. iso-8859-5)
      ;;((ascii cyrillic-iso8859-5)			. koi8-r)
      ((ascii arabic-iso8859-6)				. iso-8859-6)
@@ -118,8 +120,6 @@
      ((ascii latin-iso8859-9)				. iso-8859-9)
      ,(if (find-coding-system 'iso-8859-14)
 	  '((ascii latin-iso8859-14)			. iso-8859-14))
-     ,(if (find-coding-system 'iso-8859-15)
-	  '((ascii latin-iso8859-15)			. iso-8859-15))
      ;; ,(if (featurep 'utf-2000)
      ;;      '((ascii latin-jisx0201
      ;;               japanese-jisx0208-1978