diff options
Diffstat (limited to 'lisp/progmodes/perl-mode.el')
| -rw-r--r-- | lisp/progmodes/perl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index ee14100f56..af456f9828 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el @@ -322,7 +322,7 @@ The expansion is entirely correct because it uses the C preprocessor." (while (< (point) limit) (cond ((or (null (setq char (nth 3 state))) - (and (char-valid-p char) (eq (char-syntax (nth 3 state)) ?\"))) + (and (characterp char) (eq (char-syntax (nth 3 state)) ?\"))) ;; Normal text, or comment, or docstring, or normal string. nil) ((eq (nth 3 state) ?\n) |