浏览代码

bs-show: use files-and-specials by default

pull/15/head
10sr 7 年前
父节点
当前提交
bcbce91f96
共有 1 个文件被更改,包括 4 次插入1 次删除
  1. +4
    -1
      emacs.el

+ 4
- 1
emacs.el 查看文件

@@ -1064,9 +1064,12 @@ found, otherwise returns nil."
(when (autoload-eval-lazily 'bs '(bs-show)
(add-to-list 'bs-configurations
'("specials" "^\\*" nil ".*" nil nil))
(add-to-list 'bs-configurations
'("files-and-specials" "^\\*" buffer-file-name ".*" nil nil))
(defvar bs-mode-map)
(defvar bs-current-configuration)
(define-key bs-mode-map (kbd "t")
;; TODO: fix toggle feature
(lambda ()
(interactive)
(if (string= "specials"
@@ -1082,7 +1085,7 @@ found, otherwise returns nil."
;; bs-visits-non-file bs-sort-buffer-interns-are-last)))
)
(defalias 'list-buffers 'bs-show)
(set-variable 'bs-default-configuration "files")
(set-variable 'bs-default-configuration "files-and-specials")
(set-variable 'bs-default-sort-name "by nothing")
(add-hook 'bs-mode-hook
(lambda ()


正在加载...
取消
保存