From c2b706ff2f3aa42d58a03febad1d1b8f8d5a1142 Mon Sep 17 00:00:00 2001
From: bdunahu <bdunahu@operationnull.com>
Date: Sun, 4 Jan 2026 13:13:39 -0700
Subject: remove unnecessary nested guix dir

---
 .../files/.config/emacs/modules/bd--window.el      | 59 ----------------------
 1 file changed, 59 deletions(-)
 delete mode 100644 guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--window.el

(limited to 'guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--window.el')

diff --git a/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--window.el b/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--window.el
deleted file mode 100644
index bdc173b..0000000
--- a/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--window.el
+++ /dev/null
@@ -1,59 +0,0 @@
-;;; -*- lexical-binding: t; -*-
-;;; Commentary:
-;;; Code:
-
-
-(require 'transient)
-
-(setopt switch-to-buffer-obey-display-actions t
-        switch-to-buffer-in-dedicated-window 'pop)
-;; C-u C-h a ^display-buffer-[^-]
-(add-to-list 'display-buffer-alist
-             '("^\\*Async Shell Command\\*.*$"
-               (display-buffer-no-window)))
-
-(defun bd/layout--do-with-haste (f)
-  (let* ((args (transient-args 'bd/layout-dispatcher))
-         (haste (if (member "haste" args) 3 1)))
-    (funcall f haste)))
-(transient-define-prefix bd/layout-dispatcher ()
-  ["Dispatcher > Layout\n"
-   ["Infixes"
-    ("s" "haste" "haste")]]
-  [["Commands"
-    ("-" "text decrease"
-     (lambda () (interactive) (bd/layout--do-with-haste #'text-scale-decrease))
-     :transient t)
-    ("=" "text increase"
-     (lambda () (interactive) (bd/layout--do-with-haste #'text-scale-increase))
-     :transient t)
-    ("b" "narrow"
-     (lambda () (interactive) (bd/layout--do-with-haste #'shrink-window-horizontally))
-     :transient t)
-    ("f" "widen"
-     (lambda () (interactive) (bd/layout--do-with-haste #'enlarge-window-horizontally))
-     :transient t)
-    ("p" "shrink"
-     (lambda () (interactive) (bd/layout--do-with-haste #'shrink-window))
-     :transient t)
-    ("n" "enlarge"
-     (lambda () (interactive) (bd/layout--do-with-haste #'enlarge-window))
-     :transient t)
-    ("|" "balance" balance-windows)]
-   [""
-    ("N" "shift down" windmove-swap-states-down :transient t)
-    ("P" "shift up" windmove-swap-states-up :transient t)
-    ("F" "shift right" windmove-swap-states-right :transient t)
-    ("B" "shift left" windmove-swap-states-left :transient t)]
-   [""
-    ("a" "alpha" bd/set-frame-alpha)
-    ("w" "wallpaper" bd/set-bg)
-    ("t" "theme" load-theme)]
-   [""
-    ("z" "widen gaps" exwm-outer-gaps-increment :transient t)
-    ("x" "shrink gaps" exwm-outer-gaps-decrement :transient t)]])
-(keymap-global-set "C-c w" #'bd/layout-dispatcher)
-
-
-(provide 'bd--window)
-;;; bd--window.el ends here
-- 
cgit v1.2.3