[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm 402ba1f548 3/4: Improve regexp in `helm-apropos-get-d
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm 402ba1f548 3/4: Improve regexp in `helm-apropos-get-default` |
Date: |
Sun, 6 Nov 2022 15:58:47 -0500 (EST) |
branch: elpa/helm
commit 402ba1f548c235766e33f76b8cc0483053768d79
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Improve regexp in `helm-apropos-get-default`
---
helm-elisp.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/helm-elisp.el b/helm-elisp.el
index 530f7c0e04..82bb723c48 100644
--- a/helm-elisp.el
+++ b/helm-elisp.el
@@ -802,7 +802,7 @@ is only used to test DEFAULT."
(sym (thing-at-point 'symbol))
(prefix (when (and sym rss)
(cl-loop for (k . _v) in rss
- when (string-match k sym)
+ when (string-match (concat "\\`" k) sym)
return k))))
(if prefix
(replace-regexp-in-string prefix (cdr (assoc prefix rss)) sym)