# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 891839216 0
# Node ID ecfe57c6e4a88628e5ecd2669faee5a25debbeb2
# Parent  456146137d236054ca79a51b5d3d79dc506c1450
Set exit-function to
exit-japanese-environment for Japanese environment.

diff -r 456146137d23 -r ecfe57c6e4a8 lisp/language/japanese.el
--- a/lisp/language/japanese.el	Mon Apr 06 05:06:12 1998 +0000
+++ b/lisp/language/japanese.el	Mon Apr 06 05:06:56 1998 +0000
@@ -78,6 +78,7 @@
 
 (set-language-info-alist
  "Japanese" '((setup-function . setup-japanese-environment)
+	      (exit-function . exit-japanese-environment)
 	      (tutorial . "TUTORIAL.jp")
 	      (charset japanese-jisx0208 japanese-jisx0208-1978
 		       japanese-jisx0212 latin-jisx0201 katakana-jisx0201)