| @@ -2379,33 +2379,25 @@ Any output will be written to current buffer." | |||||
| ) | ) | ||||
| ;; dired-k seems to always create index.lock file so disabling temporarily | ;; dired-k seems to always create index.lock file so disabling temporarily | ||||
| '(when (fboundp 'dired-k) | |||||
| (set-variable 'dired-k-style 'git) | |||||
| ;; What is the best way of doing this? | |||||
| (with-eval-after-load 'dired-k | |||||
| (fset 'dired-k--highlight-by-file-attribyte 'ignore)) | |||||
| ;; (set-variable 'dired-k-size-colors | |||||
| ;; `((,most-positive-fixnum))) | |||||
| ;; (set-variable 'dired-k-date-colors | |||||
| ;; `((,most-positive-fixnum))) | |||||
| (with-eval-after-load 'dired | |||||
| ;; You can use dired-k alternative to revert-buffer | |||||
| (defvar dired-mode-map) | |||||
| ;; (define-key dired-mode-map (kbd "g") 'dired-k) | |||||
| ) | |||||
| (when (fboundp 'dired-k) | |||||
| (set-variable 'dired-k-style 'git) | |||||
| ;; What is the best way of doing this? | |||||
| (with-eval-after-load 'dired-k | |||||
| (fset 'dired-k--highlight-by-file-attribyte 'ignore)) | |||||
| ;; (set-variable 'dired-k-size-colors | |||||
| ;; `((,most-positive-fixnum))) | |||||
| ;; (set-variable 'dired-k-date-colors | |||||
| ;; `((,most-positive-fixnum))) | |||||
| (with-eval-after-load 'dired | |||||
| ;; You can use dired-k alternative to revert-buffer | |||||
| (defvar dired-mode-map) | |||||
| ;; (define-key dired-mode-map (kbd "g") 'dired-k) | |||||
| ) | |||||
| ;; always execute dired-k when dired buffer is opened | |||||
| (add-hook 'dired-initial-position-hook 'dired-k) | |||||
| (add-hook 'dired-after-readin-hook #'dired-k-no-revert) | |||||
| (add-hook 'dired-mode-hook | |||||
| (lambda () | |||||
| (setq revert-buffer-function | |||||
| ;; TODO: Define function name | |||||
| (lambda (arg noconfirm) | |||||
| (dired-revert arg noconfirm) | |||||
| (dired-k-no-revert))))) | |||||
| ) | |||||
| ;; always execute dired-k when dired buffer is opened | |||||
| (add-hook 'dired-after-readin-hook #'dired-k-no-revert) | |||||
| ) | |||||
| ;; Local Variables: | ;; Local Variables: | ||||
| ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) | ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) | ||||