From: Dave Love <fx@gnu.org>
Date: Sun, 26 May 2002 22:42:31 +0000 (+0000)
Subject: (encoded-kbd-setup-keymap) <ccl>:
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~747
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b4bb307b630f38c7439d83efd029ca37b4bffa10;p=emacs.git

(encoded-kbd-setup-keymap) <ccl>:
Use :valid property.
---

diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el
index 11cd3a6e3cd..e66c9f0009e 100644
--- a/lisp/international/encoded-kb.el
+++ b/lisp/international/encoded-kb.el
@@ -298,7 +298,7 @@ The following key sequence may cause multilingual text insertion."
 	(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