diff options
| author | Glenn Morris <rgm@gnu.org> | 2010-11-10 19:48:46 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2010-11-10 19:48:46 -0800 |
| commit | b010e1bafc67c58eff793c24fea0d113fd03e23b (patch) | |
| tree | 3f215aae435e80e527177c5a8b82442ee4a646d2 /lisp/ls-lisp.el | |
| parent | d226db8cfea69387f7120ad87a0e90f3513e5d31 (diff) | |
| download | emacs-b010e1bafc67c58eff793c24fea0d113fd03e23b.tar.gz | |
Fix some ls-lisp oddness.
* lisp/ls-lisp.el (ls-lisp-dired-ignore-case): Make it an obsolete alias.
Diffstat (limited to 'lisp/ls-lisp.el')
| -rw-r--r-- | lisp/ls-lisp.el | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el index b01ad6f9510..c7023add59b 100644 --- a/lisp/ls-lisp.el +++ b/lisp/ls-lisp.el @@ -86,10 +86,16 @@ option will have no effect until you restart Emacs." (const UNIX)) :group 'ls-lisp) +;; Only made an obsolete alias in 23.3. Before that, the initial +;; value was set according to: +;; (or (memq ls-lisp-emulation '(MS-Windows MacOS)) +;; (and (boundp 'ls-lisp-dired-ignore-case) ls-lisp-dired-ignore-case)) +;; Which isn't the right thing to do. +(define-obsolete-variable-alias 'ls-lisp-dired-ignore-case + 'ls-lisp-ignore-case "21.1") + (defcustom ls-lisp-ignore-case - ;; Name change for consistency with other option names. - (or (memq ls-lisp-emulation '(MS-Windows MacOS)) - (and (boundp 'ls-lisp-dired-ignore-case) ls-lisp-dired-ignore-case)) + (memq ls-lisp-emulation '(MS-Windows MacOS)) "Non-nil causes ls-lisp alphabetic sorting to ignore case." :type 'boolean :group 'ls-lisp) |