Mercurial > emacs

changeset 47910:729eccda4769

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
("Slovenian"): Use slovenian input-method. (encode-mac-roman): Use ucs-mule-to-mule-unicode.
author Dave Love <fx@gnu.org>
date Thu, 17 Oct 2002 15:27:37 +0000
parents 452d68adc2c1
children e07cfa93f2f3
files lisp/language/european.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/european.el	Thu Oct 17 15:21:44 2002 +0000
+++ b/lisp/language/european.el	Thu Oct 17 15:27:37 2002 +0000
@@ -287,7 +287,7 @@
 	      (coding-system . (iso-8859-2))
 	      (coding-priority . (iso-8859-2))
 	      (nonascii-translation . latin-iso8859-2)
-	      (input-method . "latin-2-postfix")
+	      (input-method . "slovenian")
 	      (unibyte-syntax . "latin-2")
 	      (unibyte-display . iso-8859-2)
 	      (tutorial . "TUTORIAL.sl")
@@ -576,6 +576,7 @@
   `(1
     ((loop
       (read-multibyte-character r0 r1)
+      (translate-character ucs-mule-to-mule-unicode r0 r1)
       (translate-character mac-roman-encoder r0 r1)
       (write-repeat r1))))
   "CCL program to encode Mac Roman")