[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm 57ad63bcb9 2/4: Fix buffer affix fn cache
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm 57ad63bcb9 2/4: Fix buffer affix fn cache |
Date: |
Sat, 2 Sep 2023 03:59:20 -0400 (EDT) |
branch: elpa/helm
commit 57ad63bcb99c152c77e39604a99f57a9dc55b9e5
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Fix buffer affix fn cache
---
helm-mode.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/helm-mode.el b/helm-mode.el
index b17ea03c1e..b43ff41bef 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1058,9 +1058,10 @@ should be specified as a string and the category as a
symbol.")
(defvar helm-completing-read--buffer-lgst-mode nil)
(defun helm-completing-read-buffer-affixation (completions)
(let ((len-mode (or helm-completing-read--buffer-lgst-mode
- (cl-loop for bn in completions
- maximize (with-current-buffer bn
- (length (symbol-name
major-mode)))))))
+ (setq helm-completing-read--buffer-lgst-mode
+ (cl-loop for bn in completions
+ maximize (with-current-buffer bn
+ (length (symbol-name
major-mode))))))))
(lambda (comp)
(let* ((buf (get-buffer comp))
(fname (buffer-file-name buf))