Minor identation fix

Done automatically, not fighting it.

.gitignore

@@ -1,7 +1,6 @@
 *.elc
 
 /elpa/*
-!/elpa/diminish-[0-9]*
 !/elpa/bind-key-[0-9]*
 !/elpa/dash-[0-9]*
 !/elpa/hydra-[0-9]*

init.el

@@ -389,6 +389,9 @@
              db/define-feature-shortcuts-hydra
              hydra-feature-shortcuts/body))
 
+(use-package diminish
+  :ensure t)
+
 (use-package exec-path-from-shell
   :pin "melpa-stable"
   :commands (exec-path-from-shell-copy-envs))
@@ -1934,11 +1937,6 @@ Note that this workaround is incomplete, as explained in this comment."
               sml/name-width 30)
   :commands (sml/setup))
 
-(use-package minions
-  :ensure t
-  :commands (minions-mode)
-  :init (setq minions-mode-line-lighter "…"))
-
 (use-package moody
   :ensure t
   :commands (moody-replace-mode-line-buffer-identification
@@ -2984,14 +2982,12 @@ eventuelly be set to nil, however)."
                   minibuffer-depth-indicate-mode
                   ace-window-display-mode
                   key-chord-mode
-                  minions-mode
                   which-key-mode
                   projectile-mode
                   yas-global-mode
                   global-git-commit-mode
                   marginalia-mode
-                  vertico-mode
-                  ))
+                  vertico-mode))
     (with-demoted-errors "Cannot activate mode: %s"
       (funcall mode +1)))
 

site-lisp/db-utils.el

@@ -637,6 +637,20 @@ quite sure whether something like this exists already?"
         (funcall entry)
       entry)))
 
+;; From https://protesilaos.com/codelog/2020-08-03-emacs-custom-functions-galore/, where it has been
+;; based on `windower' by Pierre Neidhardt (ambrevar on GitLab); pointer by
+;; https://sachachua.com/blog/2024/12/emacs-tv/
+(let (saved-window-configuration)
+  (define-minor-mode db/window-single-toggle
+    "Toggle between multiple windows and single window."
+    :lighter " Z"
+    :global nil
+    (if (one-window-p)
+        (when saved-window-configuration
+          (set-window-configuration saved-window-configuration))
+      (setq saved-window-configuration (current-window-configuration))
+      (delete-other-windows))))
+
 
 ;;; Base45 Decoding
 
@@ -648,7 +662,7 @@ quite sure whether something like this exists already?"
 
   (-each-indexed (string-to-list base45-alphabet)
     (-lambda (index char)
-        (puthash char index decode-hash-table)
+      (puthash char index decode-hash-table)
       ;; Add an encode-hash-table here in case base45-encode-string will ever be
       ;; written, like so: (puthash index char encode-hash-table)
       ))