Mercurial > emacs
changeset 89488:9280279b6356
(perl-font-lock-syntactic-face-function): Use characterp.
author | Dave Love <fx@gnu.org> |
---|---|
date | Wed, 10 Sep 2003 17:51:33 +0000 |
parents | b8b6645d8593 |
children | 6afa33e621d8 |
files | lisp/progmodes/perl-mode.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/perl-mode.el Wed Sep 10 17:51:08 2003 +0000 +++ b/lisp/progmodes/perl-mode.el Wed Sep 10 17:51:33 2003 +0000 @@ -295,7 +295,7 @@ ((not char) ;; Comment or docstring. (if (nth 7 state) font-lock-doc-face font-lock-comment-face)) - ((and (char-valid-p char) (eq (char-syntax (nth 3 state)) ?\")) + ((and (characterp char) (eq (char-syntax (nth 3 state)) ?\")) ;; Normal string. font-lock-string-face) ((eq (nth 3 state) ?\n)