;;; ui.el ;;;###autoload (defun doom/toggle-fullscreen () "Toggle fullscreen Emacs." (interactive) (set-frame-parameter nil 'fullscreen (unless (frame-parameter nil 'fullscreen) 'fullboth))) ;;;###autoload (defun doom/toggle-line-numbers () "Toggle `nlinum-mode'." (interactive) (nlinum-mode (if nlinum-mode -1 +1))) ;;;###autoload (defun doom/reset-theme () "Reset the color theme currently in use." (interactive) (let ((theme (car-safe custom-enabled-themes))) (when theme (mapc #'disable-theme custom-enabled-themes)) (load-theme theme t))) ;;;###autoload (defun doom/window-zoom () "Maximize and isolate the current buffer. Activate again to undo this. If the window changes before then, the undo expires." (interactive) (unless (one-window-p) (setq doom-window-zoomed nil)) (if doom-window-zoomed (progn (set-window-configuration doom-window-zoomed) (setq doom-window-zoomed nil)) (unless (one-window-p t) (setq doom-window-zoomed (current-window-configuration)) (delete-other-windows))))