From: Kenichi Handa <handa@m17n.org>
Date: Mon, 24 Feb 2003 04:50:09 +0000 (+0000)
Subject: (sentence-end-save): Variable deleted.
X-Git-Tag: ttn-vms-21-2-B4~11059
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=42a805f5b629669aa4260a216a5bc83f6bd8a954;p=emacs.git

(sentence-end-save): Variable deleted.
(setup-japanese-environment-internal): Don't setup sentence-end.
(exit-japanese-environment): Function deleted.
---

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index 97554d1c0de..d7b6d9d3879 100644
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -27,19 +27,12 @@
 
 ;;; Code:
 
-(defvar sentence-end-save nil)
-
 ;;;###autoload
 (defun setup-japanese-environment-internal ()
   (cond ((eq system-type 'ms-dos)
 	 (prefer-coding-system 'japanese-shift-jis))
 	((eq system-type 'usg-unix-v)
-	 (prefer-coding-system 'japanese-iso-8bit)))
-  (setq sentence-end-save sentence-end)
-  (setq sentence-end (concat sentence-end "\\|[$B!#!)!*(B]")))
-
-(defun exit-japanese-environment ()
-  (setq sentence-end sentence-end-save))
+	 (prefer-coding-system 'japanese-iso-8bit))))
 
 (defconst japanese-kana-table
   '((?$B$"(B ?$B%"(B ?(I1(B) (?$B$$(B ?$B%$(B ?(I2(B) (?$B$&(B ?$B%&(B ?(I3(B) (?$B$((B ?$B%((B ?(I4(B) (?$B$*(B ?$B%*(B ?(I5(B)