[elpa] master ebbbf8a: Improve bug id guessing for multi-bug mailboxes

[Robert Pluim]

branch: master
commit ebbbf8ae138a91bc588666a7bcca9f8bbef12697
Author: Robert Pluim <address@hidden>
Commit: Robert Pluim <address@hidden>

    Improve bug id guessing for multi-bug mailboxes
    
    * debbugs-gnu.el (debbugs-gnu-guess-current-id): Search backwards
    rather than from point-min for bug id.
---
 packages/debbugs/debbugs-gnu.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 3dbd2f2..5789d80 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -1576,14 +1576,13 @@ MERGED is the list of bugs merged with this one."
               (setq subject ,debbugs-gnu-subject))))))))
 
 (defun debbugs-gnu-guess-current-id ()
-  "Guess the ID based on \"#23\"."
+  "Guess the ID based on \"#23\".
+Looks at current line and then backwards from point."
   (save-excursion
     (beginning-of-line)
     (and
      (or (re-search-forward "#\\([0-9]+\\)" (line-end-position) t)
-        (progn
-          (goto-char (point-min))
-          (re-search-forward "#\\([0-9]+\\)" nil t)))
+        (re-search-backward "#\\([0-9]+\\)" nil t))
      (string-to-number (match-string 1)))))
 
 (defun debbugs-gnu-proper-bug-number (id)