popwin.el setting

pop-window-setting.el

;;--------------------------------------------------------------------------
;; popwin.el
;;--------------------------------------------------------------------------
(require 'popwin)
(setq display-buffer-function 'popwin:display-buffer)
(setq special-display-function 'popwin:special-display-popup-window)

(push '("*Shell Command Output*" :height 20) popwin:special-display-config)
;(push '("*Shell Command Output*" :height 20 :position top) popwin:special-display-config)

(setq anything-samewindow nil)
(push '("*anything*" :height 20) popwin:special-display-config)
(push '("*anything for files*" :height 20) popwin:special-display-config)

(push '("*scratch*") popwin:special-display-config)
(push '("svnlog.txt") popwin:special-display-config)
(push '("journal.txt" :regexp t) popwin:special-display-config)
;(push '("*grep*" :height 50) popwin:special-display-config)
(push '(dired-mode :position top) popwin:special-display-config) ; dired-jump-other-window (C-x 4 C-j)
(push '("*Warning*") popwin:special-display-config)
(push '("*sdic*") popwin:special-display-config) ; 何故か動かない
(push '("*sdic*" :noselect) popwin:special-display-config) ; これも駄目