mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* files.el (directory-free-space-args): Don't use -P on Darwin.

Browse source 
* term/mac-win.el: Don't set it here.
This commit is contained in:
Andreas Schwab 2002-06-30 14:42:19 +00:00
parent 7e30f58e10
commit 525fdbc9c8
3 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2002-06-30 Andreas Schwab <schwab@suse.de>
* files.el (directory-free-space-args): Don't use `-P' on Darwin.
* term/mac-win.el: Don't set it here.
2002-06-29 Andreas Schwab <schwab@suse.de>
* term/mac-win.el: Use directory-free-space-program instead of

3
lisp/files.el
View file

@ -3770,7 +3770,8 @@ preference to the program given by this variable."
:type '(choice (string :tag "Program") (const :tag "None" nil))
:group 'dired)
(defcustom directory-free-space-args "-Pk"
(defcustom directory-free-space-args
(if (eq system-type 'darwin) "-k" "-Pk")
"*Options to use when running `directory-free-space-program'."
:type 'string
:group 'dired)

5
lisp/term/mac-win.el
View file

@ -104,10 +104,7 @@
;; Don't have this yet.
(fset 'x-get-resource 'ignore)
(if (eq system-type 'darwin)
;; df on Darwin does not understand -P
(setq directory-free-space-args "-k")
(unless (eq system-type 'darwin)
;; This variable specifies the Unix program to call (as a process) to
;; deteremine the amount of free space on a file system (defaults to
;; df). If it is not set to nil, ls-lisp will not work correctly