changeset 49789:aca582e2f94c

(cperl-next-bad-style): Fix use of character constant.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 14 Feb 2003 09:58:50 +0000
parents 8bd940e52b6e
children 481b30daf13f
files lisp/progmodes/cperl-mode.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/cperl-mode.el	Fri Feb 14 09:58:27 2003 +0000
+++ b/lisp/progmodes/cperl-mode.el	Fri Feb 14 09:58:50 2003 +0000
@@ -5980,7 +5980,7 @@
 	   (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))