From: Juanma Barranquero <lekktu@gmail.com>
Date: Fri, 14 Feb 2003 09:58:50 +0000 (+0000)
Subject: (cperl-next-bad-style): Fix use of character constant.
X-Git-Tag: ttn-vms-21-2-B4~11194
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=07cb2aa33cf1722bb671dbcff800b26c2fd0b0a5;p=emacs.git

(cperl-next-bad-style): Fix use of character constant.
---

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))