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:
parent
ccad27551f
commit
0b4862789b
1 changed files with 1 additions and 1 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue