Mercurial > emacs
changeset 46100:56af4e9d2ac3
* files.el (directory-free-space-args): Don't use -P on Darwin.
* term/mac-win.el: Don't set it here.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Sun, 30 Jun 2002 14:41:47 +0000 |
| parents | d441fc235798 |
| children | 07cf11153de5 |
| files | lisp/files.el lisp/term/mac-win.el |
| diffstat | 2 files changed, 3 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Sat Jun 29 20:43:59 2002 +0000 +++ b/lisp/files.el Sun Jun 30 14:41:47 2002 +0000 @@ -3770,7 +3770,8 @@ :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)
--- a/lisp/term/mac-win.el Sat Jun 29 20:43:59 2002 +0000 +++ b/lisp/term/mac-win.el Sun Jun 30 14:41:47 2002 +0000 @@ -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