1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-24 21:41:48 -08:00

(perl-indent-line): Use eq' to compare output of char-after'.

This commit is contained in:
Stefan Monnier 2001-10-31 02:42:09 +00:00
parent ccad27551f
commit 0b4862789b

View file

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