-rw-r--r--@ 1 peter staff 22571 Apr 15 16:05 foo.txt
显示如下:
foo.txt
然而,我还有另一个功能,可以将所有目录置于列表顶部:
(defun mydired-sort ()
"Sort dired listings with directories first."
(save-excursion
(let (buffer-read-only)
(forward-line 2) ;; beyond dir. header
(sort-regexp-fields t "^.*$" "[ ]*." (point) (point-max)))
(set-buffer-modified-p nil)))
(defadvice dired-readin
(after dired-after-updating-hook first () activate)
"Sort dired listings with directories first before adding marks."
(mydired-sort))
这个第二个函数会干扰dired-details的正常显示,导致当我使用C-x d打开一个dired缓冲区时,初始显示会包含全部多余的细节信息。只有通过按下g键,即revert-buffer
来刷新显示后,目录细节才会被隐藏。
如何在所有dired显示中默认启用隐藏dired细节呢?
defcustom
-- 只需使用customize-set-variable
设置所需的选项值(或使用M-x customize-option
)。 (2)不需要引用lambda
表达式,因此不要这样做。 (3)尝试将代码缩小到问题的本质部分。例如,如果省略的内容与问题无关,则尝试摆脱它。同样适用于其余部分:递归地对代码进行二分,直到获得生成问题所需的最小代码。不要让自己和其他人浸泡在与问题无关的东西中。 - Drew