mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

(describe-cyrillic-environment-map):

Browse Source 
Renamed from describe-cyrillic-support-map.
This commit is contained in:
Richard M. Stallman 1997-06-07 05:54:15 +00:00
parent b15c3f11ac
commit 101496b159
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lisp/language/cyrillic.el
View File

@ -29,9 +29,9 @@
;;; Code:
(define-prefix-command 'describe-cyrillic-support-map)
(define-key-after describe-language-support-map [Cyrillic]
'("Cyrillic" . describe-cyrillic-support-map)
(define-prefix-command 'describe-cyrillic-environment-map)
(define-key-after describe-language-environment-map [Cyrillic]
'("Cyrillic" . describe-cyrillic-environment-map)
t)
(define-prefix-command 'setup-cyrillic-environment-map)
@ -206,7 +206,7 @@
(charset . (cyrillic-iso8859-5))
(coding-system . (iso-8859-5))
(sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
(documentation . (t . describe-cyrillic-support-map))))
(documentation . (t . describe-cyrillic-environment-map))))
(set-language-info-alist
"Cyrillic-KOI8" '((setup-function . (setup-cyrillic-iso-environment
@ -214,16 +214,16 @@
(charset . (cyrillic-iso8859-5))
(coding-system . (koi8-4))
(sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
(documentation . (t . describe-cyrillic-support-map))))
(documentation . (t . describe-cyrillic-environment-map))))
(set-language-info-alist
"Cyrillic-ALTERNATIVNYJ" '((setup-function
"Cyrillic-Alternativnyj" '((setup-function
. (setup-cyrillic-iso-environment
. setup-cyrillic-environment-map))
(charset . (cyrillic-iso8859-5))
(coding-system . (alternativnyj))
(sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
(documentation
. (t . describe-cyrillic-support-map))))
. (t . describe-cyrillic-environment-map))))
;;; cyrillic.el ends here