浏览代码

Move dired-k config

master
10sr 4 年前
父节点
当前提交
334b96807b
签署人:: 10sr GPG 密钥 ID: C384BB17CBB19347
共有 1 个文件被更改,包括 24 次插入24 次删除
  1. +24
    -24
      emacs.el

+ 24
- 24
emacs.el 查看文件

@@ -2369,6 +2369,30 @@ ARG is num to show, or defaults to 7."
)


;; dired-k
;; Current HEAD of original repo is broken
;; https://github.com/syohex/emacs-dired-k/issues/45
(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)))

;; always execute dired-k when dired buffer is opened and reverted
(add-hook 'dired-after-readin-hook #'dired-k-no-revert)

(add-hook 'switch-buffer-functions
(lambda (prev cur)
(when (derived-mode-p 'dired-mode)
(dired-k-no-revert))))
)


;; (define-minor-mode my-dired-glob-filter)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -2840,30 +2864,6 @@ Any output will be written to current buffer."
(define-key esc-map (kbd "C-s") 'swiper))


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; dired-k
;; Current HEAD of original repo is broken
;; https://github.com/syohex/emacs-dired-k/issues/45
(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)))

;; always execute dired-k when dired buffer is opened and reverted
(add-hook 'dired-after-readin-hook #'dired-k-no-revert)

(add-hook 'switch-buffer-functions
(lambda (prev cur)
(when (derived-mode-p 'dired-mode)
(dired-k-no-revert))))
)

;; ?
(define-key input-decode-map "\e[1;5C" [C-right])
(define-key input-decode-map "\e[1;5D" [C-left])


正在加载...
取消
保存