From f7dd96db3990dc6c3ad927b77a96165b1e567259 Mon Sep 17 00:00:00 2001 From: 10sr Date: Thu, 20 Oct 2011 20:24:23 +0900 Subject: [PATCH] make my-dired-display-all-mode global --- .emacs.el | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/.emacs.el b/.emacs.el index 083dccb..9a1bfe3 100644 --- a/.emacs.el +++ b/.emacs.el @@ -1178,14 +1178,20 @@ otherwise, use `my-compress-default-extension'. for compress." (define-minor-mode my-dired-display-all-mode "" :init-value nil + :global t + (my-dired-display-all-set) + (when (eq major-mode 'dired-mode) + (revert-buffer))) +(defun my-dired-display-all-set () + "" (if my-dired-display-all-mode (setq dired-actual-switches (concat "-A " dired-actual-switches)) (setq dired-actual-switches - (replace-regexp-in-string "-A " "" dired-actual-switches))) - (when (eq major-mode 'dired-mode) - (revert-buffer))) + (replace-regexp-in-string "-A " "" dired-actual-switches)))) +(add-hook 'dired-mode-hook + 'my-dired-display-all-set) (put 'dired-find-alternate-file 'disabled nil) (require 'ls-lisp)