[Emacs-diffs] trunk r116697: * nnir.el (nnir-run-namazu): Parse namazu results that are larger than 999

[Lars Ingebrigtsen]

------------------------------------------------------------
revno: 116697
revision-id: address@hidden
parent: address@hidden
author: George McNinch <address@hidden>
committer: Lars Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Fri 2014-03-07 17:58:25 +0100
message:
  * nnir.el (nnir-run-namazu): Parse namazu results that are larger than 999
  (i.e. "1,342").
modified:
  lisp/gnus/ChangeLog            changelog-20091113204419-o5vbwnq5f7feedwu-1433
  lisp/gnus/nnir.el              nnir.el-20091113204419-o5vbwnq5f7feedwu-8675

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2014-03-07 15:00:34 +0000
+++ b/lisp/gnus/ChangeLog       2014-03-07 16:58:25 +0000
@@ -1,3 +1,8 @@
+2014-03-07  George McNinch  <address@hidden>  (tiny change)
+
+       * nnir.el (nnir-run-namazu): Parse namazu results that are larger than
+       999 correctly (i.e. "1,342").
+
 2014-03-07  Lars Ingebrigtsen  <address@hidden>
 
        * gnus-agent.el (gnus-agent-update-files-total-fetched-for): Don't bug

=== modified file 'lisp/gnus/nnir.el'
--- a/lisp/gnus/nnir.el 2014-02-01 08:26:31 +0000
+++ b/lisp/gnus/nnir.el 2014-03-07 16:58:25 +0000
@@ -1487,7 +1487,7 @@
 
       (goto-char (point-min))
       (while (re-search-forward
-              "^\\([0-9]+\\.\\).*\\((score: \\([0-9]+\\)\\))\n\\([^ ]+\\)"
+              "^\\([0-9,]+\\.\\).*\\((score: \\([0-9]+\\)\\))\n\\([^ ]+\\)"
               nil t)
         (setq score (match-string 3)
               group (file-name-directory (match-string 4))