mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-30 08:09:04 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Stefan Monnier 2001-10-31 02:42:54 +00:00
parent ed88dbcbdf
commit 8ab2646a67
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/progmodes/perl-mode.el
View File

@ -481,7 +481,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