[nongnu] elpa/helm 9c5d9c57a5 2/2: Merge pull request #2545 from LevPetrovitch/issue-2544

[ELPA Syncer]

branch: elpa/helm
commit 9c5d9c57a5c28154b21433f4c297831872e77dd6
Merge: 5496dbf263 a65b4f6d91
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: GitHub <noreply@github.com>

    Merge pull request #2545 from LevPetrovitch/issue-2544
    
    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))