瀏覽代碼

Update dired-k configs

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

+ 18
- 26
emacs.el 查看文件

@@ -2379,33 +2379,25 @@ Any output will be written to current buffer."
)

;; 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:
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)


Loading…
取消
儲存