* progmodes/hideshow.el (hs-inside-comment-p): Fix hiding of first line.

Fixes: debbugs:10855

2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index db860979577..5a82dd4758d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-03-21  John Yates  <john@yates-sheets.org>  (tiny change)
+
+        * progmodes/hideshow.el (hs-inside-comment-p): Fix hiding of first
+        line (Bug#10855).
+
 2012-03-21  Drew Adams  <drew.adams@oracle.com>
 
         * info.el (Info-menu): Handle string value of FORK arg (Bug#10858).
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 104a8f96727..26db60ddbc2 100644
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -607,6 +607,7 @@ as cdr."
     ;; forward comment, and see if we are inside, then extend
     ;; forward and backward as long as we have comments
     (let ((q (point)))
+      (skip-chars-forward "[:blank:]")
       (when (or (looking-at hs-c-start-regexp)
                 (re-search-backward hs-c-start-regexp (point-min) t))
         ;; first get to the beginning of this comment...