[elpa] externals/gnorb 160f43a 309/449: New function for returning all tracked messages

[Stefan Monnier]

branch: externals/gnorb
commit 160f43aa09614f42a82cc655f73b49b96f17421d
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    New function for returning all tracked messages
    
    * gnorb-registry.el (gnorb-registry-tracked-messages): New function
      `gnorb-registry-tracked-messages' returns message-ids for all messages
      being tracked by Gnorb.
---
 gnorb-registry.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gnorb-registry.el b/gnorb-registry.el
index 5e9bb20..d4af885 100644
--- a/gnorb-registry.el
+++ b/gnorb-registry.el
@@ -195,6 +195,10 @@ archived headings as well."
 key."
   (registry-search gnus-registry-db :member `((gnorb-ids ,id))))
 
+(defun gnorb-registry-tracked-messages ()
+  "Return all message-ids that have non-empty 'gnorb-ids keys."
+  (registry-search gnus-registry-db :regex `((gnorb-ids ".+"))))
+
 (defun gnorb-registry-transition-from-props (arg)
   "Helper function for transitioning the old tracking system to the new.