[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master a69320f 1/5: [gnorb] Don't use string-trim with optional a
From: |
Eric Abrahamsen |
Subject: |
[elpa] master a69320f 1/5: [gnorb] Don't use string-trim with optional args |
Date: |
Fri, 4 May 2018 14:39:03 -0400 (EDT) |
branch: master
commit a69320f900d9f7c5e1fe472a7cdcab9a47213903
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>
[gnorb] Don't use string-trim with optional args
* packages/gnorb/gnorb-gnus.el (gnorb-gnus-search-registry):
Apparently these args aren't accepted in Emacs 25.
---
packages/gnorb/gnorb-gnus.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/packages/gnorb/gnorb-gnus.el b/packages/gnorb/gnorb-gnus.el
index 96d660e..398cc0b 100644
--- a/packages/gnorb/gnorb-gnus.el
+++ b/packages/gnorb/gnorb-gnus.el
@@ -712,7 +712,8 @@ sender:google.com subject:\"your search results\""
"\\([[:alpha:]]+\\):\\(\\(?:[^\"[:blank:]]+\\|\"[^\"]+\"\\)\\)"
(point-at-eol) t)
(push (cons (intern (match-string 1))
- (string-trim (match-string 2) "\"" "\""))
+ (replace-regexp-in-string "\\`\"\\|\"\\'" ""
+ (match-string 2)))
parsed)))
(dolist (sym (slot-value gnus-registry-db 'tracked))
(when (setq term (cdr-safe (assoc sym parsed)))