:fullscreen! toggles writeroom

This commit is contained in:
Henrik Lissner 2015-11-01 16:10:33 -05:00
parent 71546e6ee8
commit d5d1d29d5a

View File

@ -11,10 +11,12 @@
(set-frame-parameter nil 'alpha 0))))
;;;###autoload
(defun narf:toggle-fullscreen ()
(interactive)
(set-frame-parameter nil 'fullscreen
(when (not (frame-parameter nil 'fullscreen)) 'fullboth)))
(evil-define-command narf:toggle-fullscreen (&optional bang)
(interactive "<!>")
(if bang
(writeroom-mode (if writeroom-mode -1 1))
(set-frame-parameter nil 'fullscreen
(when (not (frame-parameter nil 'fullscreen)) 'fullboth))))
(defvar narf--big-mode nil)
;;;###autoload