aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/international/iso-transl.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index 2d12d01d351..aea12179170 100644
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -307,6 +307,14 @@ sequence VECTOR. (VECTOR is normally one character long.)")
307 (setq alist (cdr alist)))) 307 (setq alist (cdr alist))))
308 308
309(defun iso-transl-set-language (lang) 309(defun iso-transl-set-language (lang)
310 "Set shorter key bindings for some characters relevant for LANG.
311This affects the `C-x 8' prefix.
312
313Note that only a few languages are supported, and for more
314rigorous support it is recommended to use an input method
315instead. Also note that many of these characters can be input
316with the regular `C-x 8' map without having to specify a language
317here."
310 (interactive (list (let ((completion-ignore-case t)) 318 (interactive (list (let ((completion-ignore-case t))
311 (completing-read "Set which language? " 319 (completing-read "Set which language? "
312 iso-transl-language-alist nil t)))) 320 iso-transl-language-alist nil t))))