# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 958970449 0
# Node ID b46c4dc8c51a05fab25fd93d1b2617c7ac501917
# Parent  153d3f511546a459945b0b5ebb1a9871f9352ac4
(quail-simple-translation-keymap): Map
128..255 to quail-self-insert-command.
(quail-keyboard-layout-alist): Add definition for "pc102-de".

diff -r 153d3f511546 -r b46c4dc8c51a lisp/international/quail.el
--- a/lisp/international/quail.el	Mon May 22 04:40:00 2000 +0000
+++ b/lisp/international/quail.el	Mon May 22 04:40:49 2000 +0000
@@ -277,6 +277,10 @@
     (while (< i 127)
       (define-key map (char-to-string i) 'quail-self-insert-command)
       (setq i (1+ i)))
+    (setq i 128)
+    (while (< i 256)
+      (define-key map (vector i) 'quail-self-insert-command)
+      (setq i (1+ i)))
     (define-key map "\177" 'quail-delete-last-char)
     (define-key map [delete] 'quail-delete-last-char)
     (define-key map [backspace] 'quail-delete-last-char)
@@ -570,6 +574,15 @@
   aAsSdDfFgGhHjJkKlL\366\326\344\304~|    \
 <>yYxXcCvVbBnNmM,;.:-_        \
                               ")
+
+   '("pc102-de" . "\
+                              \
+^\2601!2\"3\2474$5%6&7/8(9)0=\337?\264`#'  \
+  qQwWeErRtTzZuUiIoOpP\374\334+*    \
+  aAsSdDfFgGhHjJkKlL\366\326\344\304      \
+<>yYxXcCvVbBnNmM,;.:-_        \
+                              ")
+
    (cons "standard" quail-keyboard-layout-standard))
   "Alist of keyboard names and corresponding layout strings.
 See the documentation of `quail-keyboard-layout' for the format of