ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Update buffer display settings

Browse source
This commit is contained in:
Tom Willemse 2015-05-09 19:14:14 +02:00
parent 96e30cf2a0
commit 4d36ff9551
1 changed files with 15 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
emacs/.emacs.d/init.el
View file

@ -439,6 +439,10 @@ PLIST contains all the pertinent ifnormation."
(c-set-offset 'arglist-close '0)
(setq-local fci-rule-column 80))
(defun oni:pop-to-buffer-in-side-window (buffer alist)
(display-buffer-in-side-window buffer alist)
(select-window (get-buffer-window buffer)))
(defun oni:print-keymap (keymap)
"Recursively print KEYMAP with keys as characters."
(mapcar (lambda (itm)
@ -1283,12 +1287,19 @@ from myaethon2.core.decorators import (
(stante-after "window"
(setq split-height-threshold 40)
(add-to-list 'display-buffer-alist
`(,(rx bol "*" (or (and (optional (one-or-more any) "-") "scratch")
(and "magit: " (one-or-more any))) "*" eol)
display-buffer-same-window))
(add-to-list 'display-buffer-alist
`(,(rx bol "*" (or "Flycheck errors*"
(and (or "ielm" "eshell") "*" eol)))
oni:pop-to-buffer-in-side-window))
(add-to-list 'display-buffer-alist
`(,(rx bol "*server*" eol) display-buffer-in-side-window))
(add-to-list
'display-buffer-alist
'("^\\*\\(?:.+-\\)?scratch\\*$" display-buffer-same-window))
(add-to-list
'display-buffer-alist
'("^\\*magit: .*\\*$" display-buffer-same-window)))
'("^\\*Help\\*$" display-buffer-in-side-window)))
(stante-after woman
(setq woman-fill-column 72))