branch: externals/greader
commit 5595e4806fb5e514e519a89cff2fe527a3988de2
Author: Michelangelo Rodriguez <michelangelo.rodrig...@gmail.com>
Commit: Michelangelo Rodriguez <michelangelo.rodrig...@gmail.com>
greader-dict.el: cosmetic fixes.
---
greader-dict.el | 23 +++++++++++------------
1 file changed, 11 insertions(+), 12 deletions(-)
diff --git a/greader-dict.el b/greader-dict.el
index 0b0eaf6d8a..09e2be4277 100644
--- a/greader-dict.el
+++ b/greader-dict.el
@@ -666,18 +666,17 @@ If TYPE is `all', all items in the current dictionary
will be included."
(let ((matches nil))
(maphash
(lambda (k v)
- (cond ((equal (greader-dict-item-type k) type)
- (let ((match (string-remove-suffix
- greader-dict-match-indicator k)))
- (when decorate
- (setq match (concat match " \(" (gethash k
greader-dictionary) "\)")))
- (push match matches)))
- ((equal type 'all)
- (let ((match (string-remove-suffix
- greader-dict-match-indicator k)))
- (when decorate
- (setq match (concat match " \(" (gethash k
greader-dictionary) "\)")))
- (push match matches))))) greader-dictionary)
+ (cond
+ ((equal (greader-dict-item-type k) type)
+ (let ((match (string-remove-suffix greader-dict-match-indicator k)))
+ (when decorate
+ (setq match (concat match " \(" (gethash k greader-dictionary)
"\)")))
+ (push match matches)))
+ ((equal type 'all)
+ (let ((match (string-remove-suffix greader-dict-match-indicator k)))
+ (when decorate
+ (setq match (concat match " \(" (gethash k greader-dictionary)
"\)")))
+ (push match matches))))) greader-dictionary)
(sort
matches
(lambda (s1 s2)
