Browse Source

use files configuration in bs-show

pull/1/head
10sr 12 years ago
parent
commit
d88fe69b2f
1 changed files with 3 additions and 3 deletions
  1. +3
    -3
      emacs.el

+ 3
- 3
emacs.el View File

@@ -1110,11 +1110,11 @@ delete; o: select other; j, l: enlarge; h, k: shrink; q: quit."
) )
;; (global-set-key "\C-x\C-b" 'bs-show) ;; (global-set-key "\C-x\C-b" 'bs-show)
(defalias 'list-buffers 'bs-show) (defalias 'list-buffers 'bs-show)
(setq bs-default-configuration "this-frame")
(setq bs-default-configuration "files")
(setq bs-default-sort-name "by name") (setq bs-default-sort-name "by name")
(add-hook 'bs-mode-hook (add-hook 'bs-mode-hook
(lambda () (lambda ()
(setq bs-default-configuration "this-frame")
(setq bs-default-configuration "files")
;; (and bs--show-all ;; (and bs--show-all
;; (call-interactively 'bs-toggle-show-all)) ;; (call-interactively 'bs-toggle-show-all))
(set (make-local-variable 'scroll-margin) 0))) (set (make-local-variable 'scroll-margin) 0)))
@@ -1452,8 +1452,8 @@ delete; o: select other; j, l: enlarge; h, k: shrink; q: quit."
(let ((file "._Icon\015")) (let ((file "._Icon\015"))
(when nil (file-readable-p file) (when nil (file-readable-p file)
(delete-file file))))) (delete-file file)))))

) ; eval after load dired ) ; eval after load dired

(and (fetch-library "https://raw.github.com/10sr/emacs-lisp/master/pack.el" (and (fetch-library "https://raw.github.com/10sr/emacs-lisp/master/pack.el"
t) t)
(lazy-load-eval 'pack '(dired-do-pack-or-unpack pack)) (lazy-load-eval 'pack '(dired-do-pack-or-unpack pack))


Loading…
Cancel
Save