| @@ -2391,11 +2391,18 @@ Any output will be written to current buffer." | |||||
| (with-eval-after-load 'dired | (with-eval-after-load 'dired | ||||
| ;; You can use dired-k alternative to revert-buffer | ;; You can use dired-k alternative to revert-buffer | ||||
| (defvar dired-mode-map) | (defvar dired-mode-map) | ||||
| (define-key dired-mode-map (kbd "g") 'dired-k)) | |||||
| ;; (define-key dired-mode-map (kbd "g") 'dired-k) | |||||
| ) | |||||
| ;; always execute dired-k when dired buffer is opened | ;; always execute dired-k when dired buffer is opened | ||||
| (add-hook 'dired-initial-position-hook 'dired-k) | (add-hook 'dired-initial-position-hook 'dired-k) | ||||
| (add-hook 'dired-after-readin-hook #'dired-k-no-revert) | (add-hook 'dired-after-readin-hook #'dired-k-no-revert) | ||||
| (add-hook 'dired-mode-hook | |||||
| (lambda () | |||||
| (setq revert-buffer-function | |||||
| (lambda (arg noconfirm) | |||||
| (dired-revert arg noconfirm) | |||||
| (dired-k-no-revert))))) | |||||
| ) | ) | ||||
| ;; Local Variables: | ;; Local Variables: | ||||