Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-40

[bpt/emacs.git] / lisp / generic.el

diff --git a/lisp/generic.el b/lisp/generic.el
index 57937be..84cd4d0 100644 (file)
--- a/lisp/generic.el
+++ b/lisp/generic.el
@@ -294,8 +294,8 @@ Some generic modes are defined in `generic-x.el'."
        (when (consp start)
          (setq end (or (cdr start) end))
          (setq start (car start)))
-       (when (char-valid-p start) (setq start (char-to-string start)))
-       (when (char-valid-p end)   (setq end (char-to-string end)))
+       (when (characterp start) (setq start (char-to-string start)))
+       (when (characterp end)   (setq end (char-to-string end)))
 
        ;; Setup the vars for `comment-region'
        (if comment-start