summaryrefslogtreecommitdiff
path: root/rt-liberation.el
diff options
context:
space:
mode:
authorYoni Rabkin <yrk@gnu.org>2016-04-07 14:41:31 -0400
committerYoni Rabkin <yrk@gnu.org>2016-04-07 14:41:31 -0400
commit5f6342892f7e9c5dceb36c3e3869e0debadc847b (patch)
tree7f4e3af6a5b096b53c203fd9d987cf899bd49c67 /rt-liberation.el
parent09f7ac05aaa7ebd3fdbc96f0f697fd3e54b77870 (diff)
* rt-liberation.el: Look for the next ticket.
Don't hang around in the loop unless there is a next ticket, identified by an "id:" field. This bug was found by Martin Jesper Low Madsen <martin@martinjlowm.dk>.
Diffstat (limited to 'rt-liberation.el')
-rw-r--r--rt-liberation.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/rt-liberation.el b/rt-liberation.el
index 90b7929..2dbc0f8 100644
--- a/rt-liberation.el
+++ b/rt-liberation.el
@@ -396,7 +396,7 @@ AFTER date after predicate."
"Parser function for ticket list."
(let (ticketbase-list ticketbase (continue t))
(while (save-excursion
- (re-search-forward "[A-Za-z]" (point-max) t)) ; really?
+ (re-search-forward "^id:" (point-max) t))
(while (and continue
(re-search-forward
"^\\(\\([\.{} #[:alpha:]]+\\): \\(.*\\)\\)$\\|^--$"