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

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

[elpa] externals/disk-usage 7708379 07/26: Use process-file instead of c


From: Pierre Neidhardt
Subject: [elpa] externals/disk-usage 7708379 07/26: Use process-file instead of call-process
Date: Tue, 26 Feb 2019 03:06:37 -0500 (EST)

branch: externals/disk-usage
commit 7708379cc923abce1efcc6dc04733bb7e91dc246
Author: Pierre Neidhardt <address@hidden>
Commit: Pierre Neidhardt <address@hidden>

    Use process-file instead of call-process
---
 disk-usage.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/disk-usage.el b/disk-usage.el
index 3b26368..39963fa 100644
--- a/disk-usage.el
+++ b/disk-usage.el
@@ -55,8 +55,6 @@
 
 ;; TODO: Work out the docstrings and align to 80 columns.
 
-;; TODO: Use process-file instead of call-process.
-
 ;; TODO: Filter out files by date.  Make generic filter function?  Could factor
 ;; disk-usage-files into this.
 
@@ -167,7 +165,7 @@ $ find . -type f -exec du -sb {} +"
                :name (cadr pair)
                :size (string-to-number (cl-first pair)))))
           (split-string (with-temp-buffer
-                          (call-process disk-usage--find-command nil '(t nil) 
nil
+                          (process-file disk-usage--find-command nil '(t nil) 
nil
                                         directory
                                         "-type" "f"
                                         "-exec" disk-usage--du-command 
disk-usage--du-args "{}" "+")
@@ -214,7 +212,7 @@ This is slow but does not require any external process."
     (split-string
      (with-temp-buffer
        (with-output-to-string
-         (call-process disk-usage--du-command
+         (process-file disk-usage--du-command
                        nil '(t nil) nil
                        disk-usage--du-args path))
        (buffer-string))))))



reply via email to

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