diff options
author | psg <> | 2005-09-19 00:42:19 +0000 |
---|---|---|
committer | psg <> | 2005-09-19 00:42:19 +0000 |
commit | 8f2757d4d4a24b6724c587d9301ad4a7db73591c (patch) | |
tree | 007e94dae74063eb88e1c38c7e17302ec397f4a5 | |
parent | 895a7897f2c62cc79c43088e71599dcc7b4f739a (diff) |
debian-el: debian-bug-build-bug-menu was broken from BTS HTML format
changes (Closes: #329034).
-rw-r--r-- | debian-bug.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/debian-bug.el b/debian-bug.el index c88ebee..e3b227f 100644 --- a/debian-bug.el +++ b/debian-bug.el @@ -1714,7 +1714,7 @@ Only decodes if `rfc2047-decode-string' is available." (goto-char (point-min)) (while (re-search-forward - "\\(<H2><a name.*</a>\\(.+\\)</H2>\\)\\|\\(<li><a href=\"\\(bugreport.cgi\\?bug=\\([0-9]+\\)\\)\">\\(#[0-9]+: \\(.+\\)\\)</a>\\)" + "\\(<H2.*</a>\\(.+\\)</H2>\\)\\|\\(<li><a href=\"\\(bugreport.cgi\\?bug=\\([0-9]+\\)\\)\">\\(#[0-9]+: \\(.+\\)\\)</a>\\)" nil t) (let ((type (match-string 2)) ;;(URL (match-string 4)) @@ -1730,8 +1730,9 @@ Only decodes if `rfc2047-decode-string' is available." (t (setq bug-alist (cons (list bugnumber description) bug-alist)) (when bugs-are-open-flag - (when (and (re-search-forward "Reported by: <a href=[^>]+>" - nil t) + (when (and (re-search-forward + "Reported by: <a class=\"submitter\" href=\"pkgreport.cgi\\?submitter=[^;]+;arch=source\">" + nil t) (or (looking-at ""\\(.*\\)" <") (looking-at "\\(.*\\) <"))) (setq shortdescription |