/[emacs]/emacs/lisp/international/encoded-kb.el
ViewVC logotype

Diff of /emacs/lisp/international/encoded-kb.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.30 by handa, Tue Aug 3 12:06:47 2004 UTC revision 1.31 by handa, Wed Aug 4 13:03:06 2004 UTC
# Line 181  The following key sequence may cause mul Line 181  The following key sequence may cause mul
181     ((eq (coding-system-type coding) 1)  ; SJIS     ((eq (coding-system-type coding) 1)  ; SJIS
182      (let ((i 128))      (let ((i 128))
183        (while (< i 256)        (while (< i 256)
184          (define-key encoded-kbd-mode-map          (define-key key-translation-map
185            (vector i) 'encoded-kbd-self-insert-sjis)            (vector i) 'encoded-kbd-self-insert-sjis)
186          (setq i (1+ i))))          (setq i (1+ i))))
187      8)      8)
# Line 189  The following key sequence may cause mul Line 189  The following key sequence may cause mul
189     ((eq (coding-system-type coding) 3)  ; Big5     ((eq (coding-system-type coding) 3)  ; Big5
190      (let ((i 161))      (let ((i 161))
191        (while (< i 255)        (while (< i 255)
192          (define-key encoded-kbd-mode-map          (define-key key-translation-map
193            (vector i) 'encoded-kbd-self-insert-big5)            (vector i) 'encoded-kbd-self-insert-big5)
194          (setq i (1+ i))))          (setq i (1+ i))))
195      8)      8)

Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26