emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm a65b4f6d91 1/2: do not try using tramp-file-name-unif


From: ELPA Syncer
Subject: [nongnu] elpa/helm a65b4f6d91 1/2: do not try using tramp-file-name-unify if isn't there
Date: Mon, 5 Sep 2022 11:59:00 -0400 (EDT)

branch: elpa/helm
commit a65b4f6d9107b70c1cea781d322ff82f0213932a
Author: Lev Petrovitch <lev.petrovitch@gmail.com>
Commit: Lev Petrovitch <lev.petrovitch@gmail.com>

    do not try using tramp-file-name-unify if isn't there
---
 helm-files.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/helm-files.el b/helm-files.el
index 577a0628c5..ead04995cb 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -3221,7 +3221,8 @@ debugging purpose."
     (file-accessible-directory-p path)))
 
 (defvar helm-ff--file-accessible-directory-p-fn
-  (if (equal (func-arity 'tramp-file-name-unify) '(1 . 2))
+  ;; Handle the emacs-27 case, where `tramp-file-name-unify` isn't defined.
+  (if (and (fboundp 'tramp-file-name-unify) (equal (func-arity 
'tramp-file-name-unify) '(1 . 2)))
       #'helm-ff--file-accessible-directory-p
     #'file-accessible-directory-p))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]