From 07cb2aa33cf1722bb671dbcff800b26c2fd0b0a5 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 14 Feb 2003 09:58:50 +0000 Subject: [PATCH] (cperl-next-bad-style): Fix use of character constant. --- lisp/progmodes/cperl-mode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index a7c17720126..bde44cbea91 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -5980,7 +5980,7 @@ Currently it is tuned to C and Perl syntax." (and (eq (following-char) ?\-) (save-excursion (skip-chars-backward " \t\n") - (memq (preceding-char) '(?\= ?\> ?\< ?\, ?\(, ?\[, ?\{)))) + (memq (preceding-char) '(?\= ?\> ?\< ?\, ?\( ?\[ ?\{)))) ;; Now check for syntax type (save-match-data (setq found (point)) -- 2.39.2