mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(dired-sort-inhibit): New variable.

Browse source 
(dired-sort-toggle-or-edit): Err if dired-sort-inhibit non-nil.
This commit is contained in:
Richard M. Stallman 2002-11-21 17:31:51 +00:00
parent 304d3e5d3d
commit 23fc67ead9
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/dired.el
View file

@ -2723,6 +2723,10 @@ Thus, use \\[backward-page] to find the beginning of a group of errors."
(concat "^-[^t" dired-ls-sorting-switches "]+$")
"Regexp recognized by dired to set `by name' mode.")
(defvar dired-sort-inhibit nil
"Non-nil means the Dired sort command is disabled.
The idea is to set this buffer-locally in special Dired buffers.")
(defun dired-sort-set-modeline ()
;; Set modeline display according to dired-actual-switches.
;; Modeline display of "by name" or "by date" guarantees the user a
@ -2742,6 +2746,8 @@ Thus, use \\[backward-page] to find the beginning of a group of errors."
"Toggle between sort by date/name and refresh the dired buffer.
With a prefix argument you can edit the current listing switches instead."
(interactive "P")
(when dired-sort-inhibit
(error "Cannot sort this Dired buffer"))
(if arg
(dired-sort-other
(read-string "ls switches (must contain -l): " dired-actual-switches))