Mercurial > emacs

diff lisp/language/japanese.el @ 17841:084d922fcd78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Coding system names changed as follows: internal -> emacs-mule, automatic-conversion -> undecided. Coding category name changes as follows: coding-category-internal -> coding-category-emacs-mule. Delete functions describe-LANGUAGE-support. Delete describe-function entries and change documentation entries in each language specific information.
author Kenichi Handa <handa@m17n.org>
date Fri, 16 May 1997 00:59:09 +0000
parents 37ae0c18bd47
children 73869115ae0a
line wrap: on
line diff
--- a/lisp/language/japanese.el	Fri May 16 00:59:07 1997 +0000
+++ b/lisp/language/japanese.el	Fri May 16 00:59:09 1997 +0000
@@ -70,7 +70,7 @@
      coding-category-sjis
      coding-category-iso-8-1
      coding-category-iso-else
-     coding-category-internal))
+     coding-category-emacs-mule))
 
   (if (eq system-type 'ms-dos)
       (progn
@@ -88,14 +88,8 @@
 	rmail-file-coding-system 'iso-2022-jp)
   )
 
-(defun describe-japanese-support ()
-  "Describe how Emacs supports Japanese."
-  (interactive)
-  (describe-language-support-internal "Japanese"))
-
 (set-language-info-alist
  "Japanese" '((setup-function . setup-japanese-environment)
-	      (describe-function . describe-japanese-support)
 	      (tutorial . "TUTORIAL.jp")
 	      (charset . (japanese-jisx0208 japanese-jisx0208-1978
 			  japanese-jisx0212 latin-jisx0201
@@ -103,6 +97,6 @@
 	      (coding-system . (euc-japan-1990 sjis
 				iso-2022-jp iso-2022-jp-1978-irv))
 	      (sample-text . "Japanese ($BF|K\8l(B)		$B$3$s$K$A$O(B, (I:]FAJ(B")
-	      (documentation . nil)))
+	      (documentation . t)))
 
 ;;; japanese.el ends here