From 73916123125e28d1aea4427a8caa04ca0a65741b Mon Sep 17 00:00:00 2001 From: Markus Rost Date: Mon, 20 Jan 2003 05:45:05 +0000 Subject: [PATCH] (ls-lisp-use-insert-directory-program): Make default value system dependent. (ls-lisp-support-shell-wildcards): Add autoload cookie. --- lisp/ChangeLog | 6 ++++++ lisp/ls-lisp.el | 5 ++++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 221111ba33d..914109a1b8b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2003-01-20 Markus Rost + + * ls-lisp.el (ls-lisp-use-insert-directory-program): Make default + value system dependent. + (ls-lisp-support-shell-wildcards): Add autoload cookie. + 2003-01-19 Kim F. Storm * 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)'." (const :tag "Show Group" gid)) :group 'ls-lisp) -(defcustom ls-lisp-use-insert-directory-program nil +(defcustom ls-lisp-use-insert-directory-program + (not (memq system-type '(macos ms-dos windows-nt))) "*Non-nil causes ls-lisp to revert back to using `insert-directory-program'. This is useful on platforms where ls-lisp is dumped into Emacs, such as Microsoft Windows, but you would still like to use a program to list @@ -137,6 +138,8 @@ the contents of a directory." :type 'boolean :group 'ls-lisp) +;;; Autoloaded because it is let-bound in `recover-session', `mail-recover-1'. +;;;###autoload (defcustom ls-lisp-support-shell-wildcards t "*Non-nil means ls-lisp treats file patterns as shell wildcards. Otherwise they are treated as Emacs regexps (for backward compatibility)." -- 2.39.2