branch: externals/gnorb
commit 2660934802e23dc9062b8bbc6e6781b682ae53db
Author: Eric Abrahamsen <[email protected]>
Commit: Eric Abrahamsen <[email protected]>
gnorb-bbdb.el: Use the right catch tag name
* gnorb-bbdb.el (gnorb-bbdb-configure-posting-styles): it's 'match, not
'catch.
---
gnorb-bbdb.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/gnorb-bbdb.el b/gnorb-bbdb.el
index 8a52440..cb19aee 100644
--- a/gnorb-bbdb.el
+++ b/gnorb-bbdb.el
@@ -276,10 +276,10 @@ is non-nil (as in interactive calls) be verbose."
((consp rec-val)
(dolist (f rec-val matchp)
(when (string-match-p val f)
- (throw 'catch))))
+ (throw 'match))))
((fboundp field)
(when (matchp (funcall field r))
- (throw 'catch)))
+ (throw 'match)))
((stringp rec-val)
(when (string-match-p val rec-val)
(throw 'match)))))