Set exit-function to

exit-japanese-environment for Japanese environment.

Set exit-function to
exit-japanese-environment for Japanese environment.
0eb10198 · Kenichi Handa · fa251740 · 0eb10198
Commit 0eb10198 authored Apr 06, 1998 by Kenichi Handa
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 0 deletions

lisp/language/japanese.el lisp/language/japanese.el +1 -0

No files found.
--- a/lisp/language/japanese.el
+++ b/lisp/language/japanese.el
@@ -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)