changeset 88653:ab210513bef9

(encoded-kbd-setup-keymap) <ccl>: Use :valid property.
author Dave Love <fx@gnu.org>
date Sun, 26 May 2002 22:42:31 +0000
parents 8b4e3bbe01d4
children ce18173db20e
files lisp/international/encoded-kb.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/encoded-kb.el	Sun May 26 22:42:00 2002 +0000
+++ b/lisp/international/encoded-kb.el	Sun May 26 22:42:31 2002 +0000
@@ -298,7 +298,7 @@
 	(setq i (1+ i)))))
 
    ((eq encoded-kbd-coding 'ccl)
-    (let ((valid-codes (or (coding-system-get coding 'valid-codes)
+    (let ((valid-codes (or (coding-system-get coding :valid)
 			   '((128 . 255))))
 	  elt from to)
       (while valid-codes