| @@ -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)) | ||||