[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm 10d335dd59 1/4: Use helm-stringify
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm 10d335dd59 1/4: Use helm-stringify |
Date: |
Sat, 3 Sep 2022 02:58:52 -0400 (EDT) |
branch: elpa/helm
commit 10d335dd596816f86ae24231ea1f8b4aa92e9a59
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Use helm-stringify
---
helm-mode.el | 8 +-------
1 file changed, 1 insertion(+), 7 deletions(-)
diff --git a/helm-mode.el b/helm-mode.el
index 3816457abc..73d15247d0 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -535,13 +535,7 @@ If COLLECTION is an `obarray', a TEST should be needed.
See `obarray'."
(delq nil
(cond ((and (not (equal default ""))
(string= helm-pattern ""))
- (cons default (delete (pcase default
- ((and def (pred (stringp)))
- def)
- ((and def (pred (symbolp)))
- (symbol-name def))
- ((and def (pred (numberp)))
- (number-to-string def)))
+ (cons default (delete (helm-stringify default)
cands)))
((and (consp default) (string= helm-pattern ""))
(append (cl-loop for d in default