branch: externals/rt-liberation
commit 5f6342892f7e9c5dceb36c3e3869e0debadc847b
Author: Yoni Rabkin <[email protected]>
Commit: Yoni Rabkin <[email protected]>
* 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 <[email protected]>.
---
rt-liberation.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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:]]+\\): \\(.*\\)\\)$\\|^--$"
