# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1017695632 0
# Node ID abf6fc89e7d78d58eb221c254cb033c1fcd88b64
# Parent  40a69f39b79f558ace85ba20a6bc2e5cd7170ca3
(standard-keyboard-coding-systems): Add koi8-u and koi8-r.

diff -r 40a69f39b79f -r abf6fc89e7d7 lisp/international/mule-cmds.el
--- a/lisp/international/mule-cmds.el	Mon Apr 01 21:01:04 2002 +0000
+++ b/lisp/international/mule-cmds.el	Mon Apr 01 21:13:52 2002 +0000
@@ -1404,8 +1404,8 @@
   ;; Don't alter the terminal and keyboard coding systems here.
   ;; The terminal still supports the same coding system
   ;; that it supported a minute ago.
-;;;  (set-terminal-coding-system-internal nil)
-;;;  (set-keyboard-coding-system-internal nil)
+  ;; (set-terminal-coding-system-internal nil)
+  ;; (set-keyboard-coding-system-internal nil)
 
   (setq nonascii-translation-table nil
 	nonascii-insert-offset 0))
@@ -1896,7 +1896,7 @@
 (defconst standard-keyboard-coding-systems
   (purecopy
    '(iso-latin-1 iso-latin-2 iso-latin-3 iso-latin-4 iso-latin-5
-     iso-latin-6 iso-latin-7 iso-latin-8 iso-latin-9))
+     iso-latin-6 iso-latin-7 iso-latin-8 iso-latin-9 koi8-u koi8-r))
   "Coding systems that are commonly used for keyboards.
 `set-locale-environment' will set the `keyboard-coding-system' if the
 coding-system specified by the locale setting is a member of this list.")