[Emacs-diffs] Changes to emacs/lisp/edmacro.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     08/02/01 16:01:31

Index: lisp/edmacro.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/edmacro.el,v
retrieving revision 1.45
retrieving revision 1.46
diff -u -b -r1.45 -r1.46
--- lisp/edmacro.el     8 Jan 2008 20:44:45 -0000       1.45
+++ lisp/edmacro.el     1 Feb 2008 16:01:07 -0000       1.46
@@ -768,7 +768,7 @@
       (setq res (edmacro-subseq res 2 -2)))
     (if (and (not need-vector)
             (loop for ch across res
-                  always (and (char-valid-p ch)
+                  always (and (characterp ch)
                               (let ((ch2 (logand ch (lognot ?\M-\^@))))
                                 (and (>= ch2 0) (<= ch2 127))))))
        (concat (loop for ch across res