Commit 580250aa authored by Kenichi Handa's avatar Kenichi Handa

Make functions setup-LANGUAGE-environment

interactive and add new functions describe-LANGUAGE-support for
all LANGUAGEs supported.  Remove resisterations of input methods
which use the function encoded-kbd-select-terminal.
Typo in comment fixed.
parent 164c39f7
......@@ -69,23 +69,36 @@
'("quail-latin-5" quail-use-package "quail/latin"))
(defun setup-european-environment ()
"Setup multilingual environment (MULE) for European languages users.
It actually reset MULE to the default status, and
set quail-latin-1 as the default input method to be selected.
See also the documentation of setup-english-environment."
(setup-english-environment)
(setq default-input-method '("European" . "quail-latin-1")))
(setq default-input-method '("European" . "quail-latin-1"))
)
(defun describe-european-support ()
"Describe how Emacs support European languages."
(interactive)
(describe-language-support-internal "European"))
(set-language-info-alist
"European" '((setup-function . setup-european-environment)
(describe-function . describe-european-support)
(charset . (ascii latin-iso8859-1 latin-iso8859-2
latin-iso8859-3 latin-iso8859-4 latin-iso8859-9))
(coding-system . (iso-8859-1 iso-8859-2 iso-8859-3
iso-8859-4 iso-8859-9))
(documentation . t)
(sample-text
. "Hello, Hej, Tere, Hei, Bonjour, Gr,A|_(B Gott, Ciao, ,A!(BHola!")))
. "Hello, Hej, Tere, Hei, Bonjour, Gr,A|_(B Gott, Ciao, ,A!(BHola!")
(documentation . "\
Almost all of European languages are supported by the character sets and
coding systems listed below.
To input them, LEIM (Libraries for Emacs Input Methods) should have been
installed.")
))
(let ((languages '("French" "German" "Spanish" "Italian"
;; We have to list much more European langauges here.
;; We have to list much more European languages here.
))
(val '("quail-latin-1" quail-use-package "quail/latin")))
(while languages
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment