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

Show circe chats in frames without a minibuffer

Browse source 
This only actually works when a circe chat is opened with something like
`switch-buffer-other-frame'. Just switching buffers normally doesn't
work. Which is actually pretty much how I want it to be.
This commit is contained in:
Tom Willemse 2015-10-02 22:44:36 +02:00
parent 7bbed85972
commit a75647fd4f
1 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -236,6 +236,13 @@ But only if it is a maildir inbox."
"Function for `diary-display-hook'." "Function for `diary-display-hook'."
(diary-fancy-display)) (diary-fancy-display))
(defun oni:display-in-minibufferless-frame (buffer _)
(let ((default-frame-alist default-frame-alist))
(push '(minibuffer . nil) default-frame-alist)
(let ((frame (make-frame)))
(select-frame frame)
(switch-to-buffer buffer))))
(defun oni:downcase-prev (num) (defun oni:downcase-prev (num)
(interactive "p") (interactive "p")
(oni:change-prev-case num 'down)) (oni:change-prev-case num 'down))
@ -1048,7 +1055,7 @@ from myaethon2.core.decorators import (
(setq lui-time-stamp-format "%H:%M") (setq lui-time-stamp-format "%H:%M")
(setq lui-fill-type 'variable) (setq lui-fill-type 'variable)
(add-hook 'lui-mode-hook (lambda () (setq right-margin-width 5))) (add-hook 'lui-mode-hook (lambda () (setq right-margin-width 5)))
(add-hook 'circe-channel-mode-hook (lambda () (setq mode-line-format "")))) (add-hook 'circe-channel-mode-hook (lambda () (setq mode-line-format nil))))
(stante-after compile (stante-after compile
(setq compilation-scroll-output t)) (setq compilation-scroll-output t))
@ -1326,7 +1333,10 @@ from myaethon2.core.decorators import (
'("^\\*Help\\*$" display-buffer-in-side-window)) '("^\\*Help\\*$" display-buffer-in-side-window))
(add-to-list (add-to-list
'display-buffer-alist 'display-buffer-alist
`(,(rx bol "*helm") display-buffer-in-side-window (side . right)))) `(,(rx bol "*helm") display-buffer-in-side-window (side . right))
(add-to-list 'display-buffer-alist
'("^\#mowedline$" oni:display-in-minibufferless-frame))))
(stante-after woman (stante-after woman
(setq woman-fill-column 72)) (setq woman-fill-column 72))