Move hidden-mode-line-mode to the Org config

configuration.org

@@ -351,6 +351,39 @@ name."
                                   "index.org")))
 #+END_SRC
 
+** Frame manipulation
+
+*** Hidden modeline mode
+
+To temporarily hide the mode line.
+
+Copied from http://emacs-doctor.com/emacs-strip-tease.html
+
+#+BEGIN_SRC emacs-lisp
+(defvar hidden-mode-line-mode nil)
+(defvar hide-mode-line nil)
+
+(define-minor-mode hidden-mode-line-mode
+  "Minor mode to hide the mode-line in the current buffer."
+  :init-value nil
+  :global nil
+  :variable hidden-mode-line-mode
+  :group 'editing-basics
+  (if hidden-mode-line-mode
+      (setq hide-mode-line mode-line-format
+            mode-line-format nil)
+    (setq mode-line-format hide-mode-line
+          hide-mode-line nil))
+  (force-mode-line-update)
+  (redraw-display)
+  (when (and (called-interactively-p 'interactive)
+             hidden-mode-line-mode)
+    (run-with-idle-timer
+     0 nil 'message
+     (concat "Hidden Mode Line Mode enabled.  "
+             "Use M-x hidden-mode-line-mode to make mode-line appear."))))
+#+END_SRC
+
 ** ~c-mode~ related
 
 *** Copy the prototype of the current function

init.el

@@ -30,7 +30,6 @@
 (load "round-number-to-decimals")
 (load "zim")
 (load "text-manip")
-(load "frame-manip")
 (load "window-manip")
 (load "xdg-paths")
 (load "utils")

lisp/frame-manip.el

@@ -1,24 +0,0 @@
-;; Copied from http://emacs-doctor.com/emacs-strip-tease.html
-
-(defvar hidden-mode-line-mode nil)
-(defvar hide-mode-line nil)
-
-(define-minor-mode hidden-mode-line-mode
-  "Minor mode to hide the mode-line in the current buffer."
-  :init-value nil
-  :global nil
-  :variable hidden-mode-line-mode
-  :group 'editing-basics
-  (if hidden-mode-line-mode
-      (setq hide-mode-line mode-line-format
-            mode-line-format nil)
-    (setq mode-line-format hide-mode-line
-          hide-mode-line nil))
-  (force-mode-line-update)
-  (redraw-display)
-  (when (and (called-interactively-p 'interactive)
-             hidden-mode-line-mode)
-    (run-with-idle-timer
-     0 nil 'message
-     (concat "Hidden Mode Line Mode enabled.  "
-             "Use M-x hidden-mode-line-mode to make mode-line appear."))))