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

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

[nongnu] elpa/helm 5c3d3975a6 1/2: Rename helm-list-directory-function t


From: ELPA Syncer
Subject: [nongnu] elpa/helm 5c3d3975a6 1/2: Rename helm-list-directory-function to helm-list-remote-directory-fn
Date: Mon, 17 Jun 2024 13:00:52 -0400 (EDT)

branch: elpa/helm
commit 5c3d3975a68248e058cd3f34aff6412f98f09491
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Rename helm-list-directory-function to helm-list-remote-directory-fn
    
    make obsolete helm-list-directory-function.
---
 helm-files.el | 15 +++++++++------
 helm-help.el  |  4 ++--
 2 files changed, 11 insertions(+), 8 deletions(-)

diff --git a/helm-files.el b/helm-files.el
index 92907cf364..0e1029e6e5 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -594,7 +594,10 @@ command on remote (and/or locally if you want to trash as 
root).
 On Ubuntu-based distributions it is \\='trash-cli'."
   :type 'boolean)
 
-(defcustom helm-list-directory-function
+(defvaralias 'helm-list-directory-function 'helm-list-remote-directory-fn)
+(make-obsolete-variable 'helm-list-directory-function 
'helm-list-remote-directory-fn "4.0")
+
+(defcustom helm-list-remote-directory-fn
   (cl-case system-type
     (gnu/linux #'helm-list-dir-external)
     (berkeley-unix #'helm-list-dir-lisp)
@@ -3609,19 +3612,19 @@ debugging purpose."
 (defun helm-list-directory (directory &optional sel)
   "List directory DIRECTORY.
 
-If DIRECTORY is remote use `helm-list-directory-function',
+If DIRECTORY is remote use `helm-list-remote-directory-fn',
 otherwise use `directory-files'.
 SEL argument is only here for debugging purpose, it default to
 `helm-get-selection'."
   (let* ((remote (file-remote-p directory 'method))
-         (helm-list-directory-function
+         (helm-list-remote-directory-fn
           (helm-acase remote
             ("ftp" #'helm-list-dir-lisp)
             ("adb" #'helm-list-dir-adb)
-            (t helm-list-directory-function)))
+            (t helm-list-remote-directory-fn)))
          (use-ext-remote-fn
           (and remote
-               (eq helm-list-directory-function 'helm-list-dir-external)))
+               (eq helm-list-remote-directory-fn 'helm-list-dir-external)))
          (sort-method (helm-acase helm-ff-initial-sort-method
                         (newest (if use-ext-remote-fn
                                     "-t" #'file-newer-than-file-p))
@@ -3632,7 +3635,7 @@ SEL argument is only here for debugging purpose, it 
default to
                                #'helm-group-candidates-by)))))
     (if remote
         (ignore-errors
-          (funcall helm-list-directory-function directory sort-method))
+          (funcall helm-list-remote-directory-fn directory sort-method))
       (helm-acase helm-ff-initial-sort-method
         ((newest size)
          (sort (helm-local-directory-files
diff --git a/helm-help.el b/helm-help.el
index 49c2bc544b..0666b98233 100644
--- a/helm-help.el
+++ b/helm-help.el
@@ -1040,9 +1040,9 @@ Starting at helm version 2.9.7 it is somewhat possible to
 colorize fnames by listing files without loosing performances with
 external commands (ls and awk) if your system is compatible.
 For this you can use `helm-list-dir-external' as value
-for `helm-list-directory-function'.
+for `helm-list-remote-directory-fn'.
 
-See `helm-list-directory-function' documentation for more infos.
+See `helm-list-remote-directory-fn' documentation for more infos.
 
 **** Completing host
 



reply via email to

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