changeset 4240:b98680995adb

[xemacs-hg @ 2007-10-26 10:51:02 by aidan] Couple of tweaks to mule/latin.el; correct the POSIX code for Polish, explicitly specify the tutorial coding system when a tutorial is provided.
author aidan
date Fri, 26 Oct 2007 10:51:06 +0000
parents 9e838285ba76
children c755919fd513
files lisp/ChangeLog lisp/mule/latin.el
diffstat 2 files changed, 11 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Oct 25 21:51:20 2007 +0000
+++ b/lisp/ChangeLog	Fri Oct 26 10:51:06 2007 +0000
@@ -1,3 +1,11 @@
+2007-10-26  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* mule/latin.el:
+	"pl" is the normal POSIX language code for Polish, not "po"; if a
+	tutorial is provided, set tutorial-coding-system explicitly based
+	on the language environment coding system, to override confusion
+	that can arise with the variant language environments.
+
 2007-10-01  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* byte-optimize.el:
--- a/lisp/mule/latin.el	Thu Oct 25 21:51:20 2007 +0000
+++ b/lisp/mule/latin.el	Fri Oct 26 10:51:06 2007 +0000
@@ -681,7 +681,7 @@
       ("Czech" ("cs" "cz") "TUTORIAL.cs" "P,Bx(Bejeme v,Ba(Bm hezk,B}(B den!"
        "latin-2-postfix")
       ("Hungarian" ("hungarian" "hu"))
-      ("Polish" "po" "TUTORIAL.pl")
+      ("Polish" ("pl" "po") "TUTORIAL.pl") ;; #### Is "po" actually used?
       ("Romanian" "ro" "TUTORIAL.ro" "Bun,Bc(B ziua, bine a,B~(Bi venit!"
        "latin-2-postfix")
       ("Serbian" "sr")
@@ -728,7 +728,8 @@
        (coding-priority ,codesys)
        (native-coding-system ,codesys)
        ,@(if locale `((locale . ,locale)))
-       ,@(if tutorial `((tutorial . ,tutorial)))
+       ,@(if tutorial `((tutorial . ,tutorial)
+			(tutorial-coding-system ,codesys)))
        ,@(if sample-text `((sample-text . ,sample-text)))
        (input-method . ,(or input-method default-input))
        (documentation . ,(format "\