changeset 1196:6c18935dbbf8

[xemacs-hg @ 2003-01-09 13:08:53 by stephent] typos <87y95uv5hw.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Thu, 09 Jan 2003 13:09:05 +0000
parents dff007bd492b
children 4ba5a507627c
files lisp/ChangeLog lisp/mule/cyril-util.el lisp/mule/ethio-util.el lisp/mule/japan-util.el lisp/mule/viet-util.el
diffstat 5 files changed, 19 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Jan 09 12:49:43 2003 +0000
+++ b/lisp/ChangeLog	Thu Jan 09 13:09:05 2003 +0000
@@ -1,3 +1,15 @@
+2003-01-09  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* mule/japan-util.el (setup-japanese-environment-internal):
+	usg-unix-v is not a suitable catchall.
+
+	* mule/viet-util.el: 
+	* mule/ethio-util.el:
+	characater -> character.
+
+	* mule/cyril-util.el (cyrillic-language-alist): There is no such
+	language as Serbo-Croatian, according to Hrvoje, who oughtta know.
+
 2003-01-04  Steve Youngs  <youngs@xemacs.org>
 
 	* XEmacs 21.5.10 "burdock" is released.
--- a/lisp/mule/cyril-util.el	Thu Jan 09 12:49:43 2003 +0000
+++ b/lisp/mule/cyril-util.el	Thu Jan 09 13:09:05 2003 +0000
@@ -45,7 +45,7 @@
 
 (defvar cyrillic-language-alist
       (list '("Belorussian") '("Bulgarian") '("Macedonian") 
-	    '("Russian") '("Serbo-Croatian") '("Ukrainian"))
+	    '("Russian") '("Serbian") '("Ukrainian"))
       "*List of known cyrillic languages")
 
 ;;;###autoload
--- a/lisp/mule/ethio-util.el	Thu Jan 09 12:49:43 2003 +0000
+++ b/lisp/mule/ethio-util.el	Thu Jan 09 13:09:05 2003 +0000
@@ -1991,7 +1991,7 @@
 
 (defun ethio-gemination nil
   "Compose the character before the point with the Ethiopic gemination mark.
-If the characater is already composed, decompose it and remove the gemination
+If the character is already composed, decompose it and remove the gemination
 mark."
   (interactive "*")
   (cond
--- a/lisp/mule/japan-util.el	Thu Jan 09 12:49:43 2003 +0000
+++ b/lisp/mule/japan-util.el	Thu Jan 09 13:09:05 2003 +0000
@@ -36,7 +36,7 @@
 (defun setup-japanese-environment-internal ()
   (cond ((eq system-type 'ms-dos)
 	 (prefer-coding-system 'shift_jis))
-	((eq system-type 'usg-unix-v)
+	(t
 	 (prefer-coding-system 'euc-jp)))
   (setq sentence-end-save sentence-end)
   (setq sentence-end (concat sentence-end "\\|[。?!]")))
--- a/lisp/mule/viet-util.el	Thu Jan 09 12:49:43 2003 +0000
+++ b/lisp/mule/viet-util.el	Thu Jan 09 13:09:05 2003 +0000
@@ -223,7 +223,7 @@
 
 ;;;###autoload
 (defun viet-decode-viqr-region (from to)
-  "Convert `VIQR' mnemonics of the current region to Vietnamese characaters.
+  "Convert `VIQR' mnemonics of the current region to Vietnamese characters.
 When called from a program, expects two arguments,
 positions (integers or markers) specifying the stretch of the region."
   (interactive "r")
@@ -240,13 +240,13 @@
 
 ;;;###autoload
 (defun viet-decode-viqr-buffer ()
-  "Convert `VIQR' mnemonics of the current buffer to Vietnamese characaters."
+  "Convert `VIQR' mnemonics of the current buffer to Vietnamese characters."
   (interactive)
   (viet-decode-viqr-region (point-min) (point-max)))
 
 ;;;###autoload
 (defun viet-encode-viqr-region (from to)
-  "Convert Vietnamese characaters of the current region to `VIQR' mnemonics.
+  "Convert Vietnamese characters of the current region to `VIQR' mnemonics.
 When called from a program, expects two arguments,
 positions (integers or markers) specifying the stretch of the region."
   (interactive "r")
@@ -263,7 +263,7 @@
 
 ;;;###autoload
 (defun viet-encode-viqr-buffer ()
-  "Convert Vietnamese characaters of the current buffer to `VIQR' mnemonics."
+  "Convert Vietnamese characters of the current buffer to `VIQR' mnemonics."
   (interactive)
   (viet-encode-viqr-region (point-min) (point-max)))