From: Stefan Monnier Date: Wed, 31 Oct 2001 02:42:09 +0000 (+0000) Subject: (perl-indent-line): Use `eq' to compare output of `char-after'. X-Git-Tag: emacs-21.2~398 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0b4862789b89ae5fef345cefee66293728884342;p=emacs.git (perl-indent-line): Use `eq' to compare output of `char-after'. --- diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index 33ff6364390..27e3ccea2b8 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el @@ -475,7 +475,7 @@ changed by, or (parse-state) if line starts in a quoted string." (beginning-of-line) (setq beg (point)) (setq shift-amt - (cond ((= (char-after bof) ?=) 0) + (cond ((eq (char-after bof) ?=) 0) ((listp (setq indent (perl-calculate-indent bof))) indent) ((looking-at (or nochange perl-nochange)) 0) (t