 
 ;; Quickly undo pop-ups or other window configurations.
 (use-package winner :ensure t
-  :init (winner-mode 1))
+  :init (winner-mode 1)
+  :bind (("<S-escape>" . winner-redo)
+         ("<escape>" . winner-undo)))
+
 (setq winner-boring-buffers
       (append winner-boring-buffers '("*helm M-x*"
                                       "helm mini*"

  "Remove unnecessary HTML from exported modified CONTENT drawer."
  (string-match "\\(\\[.*\\]\\)" content)
  (match-string 0 content))

(bind-key "<escape>" #'delete-window)

(defun ar/org-entry-child-headings (id)
  "Get org child headings for entry with ID."

(when (boundp 'use-dialog-box)
  (setq use-dialog-box nil))

(use-package fullframe :ensure t
  :commands (fullframe))

(ar/after-load 'ibuffer
  (fullframe ibuffer ibuffer-quit))
