[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm a2b18be4ed 2/3: Ensure argument is a cons before call
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm a2b18be4ed 2/3: Ensure argument is a cons before calling cdr |
Date: |
Thu, 22 Feb 2024 15:59:59 -0500 (EST) |
branch: elpa/helm
commit a2b18be4ed50f5d80806967a9e5cae780fd345b2
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Ensure argument is a cons before calling cdr
---
helm-lib.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/helm-lib.el b/helm-lib.el
index 946133f7c6..3f170ef198 100644
--- a/helm-lib.el
+++ b/helm-lib.el
@@ -1898,7 +1898,7 @@ flex or helm-flex completion style if present."
(or
styles
(helm-acase (cdr (assq from helm-completion-styles-alist))
- ((guard (cdr it)) guard))
+ ((guard (and (consp it) (cdr it))) guard))
;; We need to have flex always behind helm, otherwise
;; when matching against e.g. '(foo foobar foao frogo bar
;; baz) with pattern "foo" helm style if before flex will