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