[Emacs-diffs] master a468803: Fix indenting in perl functions with doc-comments

[Stefan Kangas]

branch: master
commit a4688030b4be6e7ef71b6c58c3051fa4bd399d33
Author: Tom Willemse <address@hidden>
Commit: Stefan Kangas <address@hidden>

    Fix indenting in perl functions with doc-comments
    
    * lisp/progmodes/perl-mode.el (perl-calculate-indent): Skip
    doc-comments as well as comments and skip the entire comment, not just
    the line.  (Bug#21647)
---
 lisp/progmodes/perl-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index 55ea341..ab3680b 100644
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -1007,8 +1007,8 @@ Returns (parse-state) if line starts inside a string."
            ;; Skip over comments and labels following openbrace.
            (while (progn
                     (skip-chars-forward " \t\f\n")
-                    (cond ((looking-at ";?#")
-                           (forward-line 1) t)
+                    (cond ((looking-at ";?#\\|^=\\w+")
+                           (forward-comment 1) t)
                           ((looking-at "\\(\\w\\|\\s_\\)+:[^:]")
                            (setq colon-line-end (line-end-position))
                            (search-forward ":")))))