Mercurial > emacs
changeset 10938:fb2da60a38de
(calculate-perl-indent): When backing up over continuations,
don't go to line beg;
perl-backward-to-start-of-continued-exp gives the right place.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 08 Mar 1995 02:22:45 +0000 |
| parents | 6fadcdae0c5e |
| children | d2971946a3d2 |
| files | lisp/progmodes/perl-mode.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/perl-mode.el Wed Mar 08 01:26:16 1995 +0000 +++ b/lisp/progmodes/perl-mode.el Wed Mar 08 02:22:45 1995 +0000 @@ -464,8 +464,8 @@ (memq (char-syntax (char-after (- (point) 2))) '(?w ?_)))) (if (eq (preceding-char) ?\,) - (perl-backward-to-start-of-continued-exp containing-sexp)) - (beginning-of-line) + (perl-backward-to-start-of-continued-exp containing-sexp) + (beginning-of-line)) (perl-backward-to-noncomment)) ;; Now we get the answer. (if (not (memq (preceding-char) '(?\; ?\} ?\{)))