guix: full refactor of configuration structure

1 files changed, 22 insertions, 0 deletions

diff --git a/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--image.el b/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--image.el
new file mode 100644
index 0000000..1d5876c
--- /dev/null
+++ b/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--image.el
@@ -0,0 +1,22 @@
+;;; -*- lexical-binding: t; -*-
+;;; Commentary:
+;;; not loaded bd 10/28/24
+;;; Code:
+
+
+(use-package image-mode
+  :config
+  (defun toggle-mode-line ()
+    "If the mode line is displayed, toggle it off.
+If the mode line is off, set it to the default value."
+    (interactive)
+    (setq mode-line-format
+          (if mode-line-format
+              nil
+            (default-value 'mode-line-format))))
+  (add-hook 'image-mode-hook 'toggle-mode-line)
+  (keymap-set image-mode-map "l" #'toggle-mode-line))
+
+
+(provide 'bd--image)
+;;; bd--image.el ends here