diff options
| author | Markus Rost | 2003-01-20 05:45:05 +0000 |
|---|---|---|
| committer | Markus Rost | 2003-01-20 05:45:05 +0000 |
| commit | 73916123125e28d1aea4427a8caa04ca0a65741b (patch) | |
| tree | 48abfdf369400908bf5b14e44d73eeeeaea0086c | |
| parent | cd8907963a3c626137711f88b3c34d1b198c0411 (diff) | |
| download | emacs-73916123125e28d1aea4427a8caa04ca0a65741b.tar.gz emacs-73916123125e28d1aea4427a8caa04ca0a65741b.zip | |
(ls-lisp-use-insert-directory-program): Make default
value system dependent.
(ls-lisp-support-shell-wildcards): Add autoload cookie.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/ls-lisp.el | 5 |
2 files changed, 10 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 221111ba33d..914109a1b8b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2003-01-20 Markus Rost <rost@math.ohio-state.edu> | ||
| 2 | |||
| 3 | * ls-lisp.el (ls-lisp-use-insert-directory-program): Make default | ||
| 4 | value system dependent. | ||
| 5 | (ls-lisp-support-shell-wildcards): Add autoload cookie. | ||
| 6 | |||
| 1 | 2003-01-19 Kim F. Storm <storm@cua.dk> | 7 | 2003-01-19 Kim F. Storm <storm@cua.dk> |
| 2 | 8 | ||
| 3 | * msb.el: Use `dir' instead of `path' everywhere. | 9 | * msb.el: Use `dir' instead of `path' everywhere. |
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el index 9f6de6753c6..1d0ace7613e 100644 --- a/lisp/ls-lisp.el +++ b/lisp/ls-lisp.el | |||
| @@ -129,7 +129,8 @@ if emulation is GNU then default is `(links uid gid)'." | |||
| 129 | (const :tag "Show Group" gid)) | 129 | (const :tag "Show Group" gid)) |
| 130 | :group 'ls-lisp) | 130 | :group 'ls-lisp) |
| 131 | 131 | ||
| 132 | (defcustom ls-lisp-use-insert-directory-program nil | 132 | (defcustom ls-lisp-use-insert-directory-program |
| 133 | (not (memq system-type '(macos ms-dos windows-nt))) | ||
| 133 | "*Non-nil causes ls-lisp to revert back to using `insert-directory-program'. | 134 | "*Non-nil causes ls-lisp to revert back to using `insert-directory-program'. |
| 134 | This is useful on platforms where ls-lisp is dumped into Emacs, such as | 135 | This is useful on platforms where ls-lisp is dumped into Emacs, such as |
| 135 | Microsoft Windows, but you would still like to use a program to list | 136 | Microsoft Windows, but you would still like to use a program to list |
| @@ -137,6 +138,8 @@ the contents of a directory." | |||
| 137 | :type 'boolean | 138 | :type 'boolean |
| 138 | :group 'ls-lisp) | 139 | :group 'ls-lisp) |
| 139 | 140 | ||
| 141 | ;;; Autoloaded because it is let-bound in `recover-session', `mail-recover-1'. | ||
| 142 | ;;;###autoload | ||
| 140 | (defcustom ls-lisp-support-shell-wildcards t | 143 | (defcustom ls-lisp-support-shell-wildcards t |
| 141 | "*Non-nil means ls-lisp treats file patterns as shell wildcards. | 144 | "*Non-nil means ls-lisp treats file patterns as shell wildcards. |
| 142 | Otherwise they are treated as Emacs regexps (for backward compatibility)." | 145 | Otherwise they are treated as Emacs regexps (for backward compatibility)." |