[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/disk-usage 5ebdc00 3/3: Merge remote-tracking branch 'e
From: |
Pierre Neidhardt |
Subject: |
[elpa] externals/disk-usage 5ebdc00 3/3: Merge remote-tracking branch 'elpa/externals/disk-usage' |
Date: |
Mon, 22 Apr 2019 07:10:11 -0400 (EDT) |
branch: externals/disk-usage
commit 5ebdc00fb69b6f3e807e25cfea667ddcc5377f54
Merge: b138397 f4f6bfa
Author: Pierre Neidhardt <address@hidden>
Commit: Pierre Neidhardt <address@hidden>
Merge remote-tracking branch 'elpa/externals/disk-usage'
---
disk-usage.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/disk-usage.el b/disk-usage.el
index 994b4da..7e76ed5 100644
--- a/disk-usage.el
+++ b/disk-usage.el
@@ -78,23 +78,24 @@
"Whether to kill the current `disk-usage' buffer before moving directory."
:type 'boolean)
+(defvaralias 'disk-usage--du-command 'disk-usage-du-command)
(defcustom disk-usage-du-command (if (member system-type '(gnu gnu/linux
gnu/kfreebsd))
"du"
"gdu")
"Non-GNU users need GNU's `du' for the `-b' flag. See `disk-usage-du-args'."
:type 'string)
-(defvaralias 'disk-usage--du-command 'disk-usage-du-command)
+(defvaralias 'disk-usage--du-args 'disk-usage-du-args)
(defcustom disk-usage-du-args "-sb"
"Non-GNU users need GNU's `du' for the `-b' flag. See
`disk-usage-du-command'."
:type 'string)
-(defvaralias 'disk-usage--du-args 'disk-usage-du-args)
+(defvaralias 'disk-usage--find-command 'disk-usage-find-command)
(defcustom disk-usage-find-command "find"
"The `find' executable. This is required for recursive listings."
:type 'string)
-(defvaralias 'disk-usage--find-command 'disk-usage-find-command)
+(defvaralias 'disk-usage--directory-size-function
'disk-usage-directory-size-function)
(defcustom disk-usage-directory-size-function
(if (executable-find disk-usage-du-command)
#'disk-usage-directory-size-with-du
@@ -102,7 +103,6 @@
"Function that returns the total disk usage of the directory passed as
argument."
:type '(choice (function :tag "Native (slow)"
disk-usage-directory-size-with-emacs)
(function :tag "System \"du\""
disk-usage-directory-size-with-du)))
-(defvaralias 'disk-usage--directory-size-function
'disk-usage-directory-size-function)
(defface disk-usage-inaccessible
'((t :inherit error