[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm 39ed67040d 1/2: Fix error when extracting props in a
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm 39ed67040d 1/2: Fix error when extracting props in a file of length 1 |
Date: |
Thu, 20 Oct 2022 11:58:52 -0400 (EDT) |
branch: elpa/helm
commit 39ed67040d5a08fe27a138678d852e6aa577bbde
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Fix error when extracting props in a file of length 1
---
helm-files.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/helm-files.el b/helm-files.el
index 3b86687204..e9fc9d0a58 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -4152,13 +4152,13 @@ Arg DISP is the display part of the candidate."
(defun helm-ff--is-dir-from-disp (disp)
"Return the face used for candidate when candidate is a directory."
- (cl-loop with faces = (helm-mklist (get-text-property 2 'face disp))
+ (cl-loop with faces = (helm-mklist (get-text-property 1 'face disp))
for face in '(helm-ff-directory helm-ff-dotted-directory)
thereis (memq face faces)))
(defun helm-ff--is-file-from-disp (disp)
"Return the face used for file's candidate or dotted-symlink dirs."
- (cl-loop with faces = (helm-mklist (get-text-property 2 'face disp))
+ (cl-loop with faces = (helm-mklist (get-text-property 1 'face disp))
for face in '(helm-ff-file
helm-ff-suid
helm-ff-executable