瀏覽代碼

Add dired-k configs

master
10sr 5 年之前
父節點
當前提交
bfd9abf2ce
簽署人: 10sr GPG 金鑰 ID: 7BEC428194130EB2
共有 1 個檔案被更改,包括 19 行新增0 行删除
  1. +19
    -0
      emacs.el

+ 19
- 0
emacs.el 查看文件

@@ -2377,6 +2377,25 @@ Any output will be written to current buffer."
(define-key esc-map (kbd "C-s") 'swoop-multi)
)

(when (fboundp 'dired-k)
(set-variable 'dired-k-style 'git)
;; What is the best way of doing this?
(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)
)

;; Local Variables:
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)
;; flycheck-checker: emacs-lisp


Loading…
取消
儲存