[Emacs-diffs] Changes to emacs/lisp/progmodes/perl-mode.el

[Stefan Monnier]

Index: emacs/lisp/progmodes/perl-mode.el
diff -u emacs/lisp/progmodes/perl-mode.el:1.64 
emacs/lisp/progmodes/perl-mode.el:1.65
--- emacs/lisp/progmodes/perl-mode.el:1.64      Fri Feb 10 09:00:30 2006
+++ emacs/lisp/progmodes/perl-mode.el   Wed Apr 12 05:11:12 2006
@@ -721,7 +721,10 @@
        (save-excursion
          (forward-char 1)
          (forward-sexp -1)
-         (perl-indent-new-calculate 'virtual nil parse-start)))
+         (perl-indent-new-calculate
+           ;; Recalculate the parsing-start, since we may have jumped
+           ;; dangerously close (typically in the case of nested functions).
+           'virtual nil (save-excursion (perl-beginning-of-function)))))
    (and (and (= (following-char) ?{)
             (save-excursion (forward-char) (perl-hanging-paren-p)))
        (+ (or default (perl-calculate-indent parse-start))