skip paragraphs which start with comments

diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm
index cf2ab8416566df3645c823d758393ce82cd27c0f..f7c74d55fa4227eb2af3d2d5d99fd8b4d5a8cb79 100644 (file)
--- a/Debbugs/Control.pm
+++ b/Debbugs/Control.pm
@@ -1950,7 +1950,7 @@ sub summary {
              # pseudo-headers
              if ($line =~ m{^\s*(?:(?:Package|Source|Version)\:| #pseudo headers
                                 (?:package|(?:no|)owner|severity|tag|summary| #control
-                                     reopen|close|(?:not|)(?:fixed|found)|clone|
+                                     \#|reopen|close|(?:not|)(?:fixed|found)|clone|
                                      (?:force|)merge|user(?:category|tag|)
                                 )
                            )\s+\S}x) {