aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2002-07-24 22:23:44 +0000
committerDave Love2002-07-24 22:23:44 +0000
commite65186d5b293d718c927e179a64103e661b24c95 (patch)
tree8dcacd4cd1e757e4c0b29a7d0fce8e8986f725ec
parentd21ba5e07da8a201b70193aa0c693d6bcf9f18e1 (diff)
downloademacs-e65186d5b293d718c927e179a64103e661b24c95.tar.gz
emacs-e65186d5b293d718c927e179a64103e661b24c95.zip
comment
-rw-r--r--lisp/international/utf-8.el1
-rw-r--r--lisp/language/cyril-util.el4
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/international/utf-8.el b/lisp/international/utf-8.el
index b3f6390322e..327bc7261de 100644
--- a/lisp/international/utf-8.el
+++ b/lisp/international/utf-8.el
@@ -341,7 +341,6 @@ option is not the default."
341 (write-multibyte-character r3 r2)))) 341 (write-multibyte-character r3 r2))))
342 342
343 ;; Surrogates, U+D800 .. U+DFFF 343 ;; Surrogates, U+D800 .. U+DFFF
344 ;; Fixme: process them properly.
345 (if (r3 < #xe000) 344 (if (r3 < #xe000)
346 ((r3 = r6) 345 ((r3 = r6)
347 (write-multibyte-character r3 r0) ; eight-bit-graphic 346 (write-multibyte-character r3 r0) ; eight-bit-graphic
diff --git a/lisp/language/cyril-util.el b/lisp/language/cyril-util.el
index e35d45b5afe..394400cda97 100644
--- a/lisp/language/cyril-util.el
+++ b/lisp/language/cyril-util.el
@@ -1,6 +1,6 @@
1;;; cyril-util.el --- utilities for Cyrillic scripts 1;;; cyril-util.el --- utilities for Cyrillic scripts
2 2
3;; Copyright (C) 1997, 2001 Free Software Foundation, Inc. 3;; Copyright (C) 1997, 2001, 2002 Free Software Foundation, Inc.
4 4
5;; Keywords: mule, multilingual, Cyrillic 5;; Keywords: mule, multilingual, Cyrillic
6 6
@@ -25,6 +25,8 @@
25 25
26;;; Code: 26;;; Code:
27 27
28;; Fixme: are the next two useful?
29
28;;;###autoload 30;;;###autoload
29(defun cyrillic-encode-koi8-r-char (char) 31(defun cyrillic-encode-koi8-r-char (char)
30 "Return KOI8-R external character code of CHAR if appropriate." 32 "Return KOI8-R external character code of CHAR if appropriate."