From aab5bfd074e57d06a79e39d7c7c4760e1f385a06 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 17 Oct 2022 21:41:28 -0500
Subject: Bankruptcy 9

---
 lisp/+ace-window.el | 40 ----------------------------------------
 1 file changed, 40 deletions(-)
 delete mode 100644 lisp/+ace-window.el

(limited to 'lisp/+ace-window.el')

diff --git a/lisp/+ace-window.el b/lisp/+ace-window.el
deleted file mode 100644
index 9e631a2..0000000
--- a/lisp/+ace-window.el
+++ /dev/null
@@ -1,40 +0,0 @@
-;;; +ace-window.el -*- lexical-binding: t; -*-
-
-;;; Code:
-
-(require 'ace-window)
-
-;;;###autoload
-(define-minor-mode +ace-window-display-mode
-  "Minor mode for updating data for `+modeline-ace-window-display'."
-  ;; This is stolen from ace-window.el but with the mode-line stuff ripped out.
-  :global t
-  (if +ace-window-display-mode
-      (progn                            ; Enable
-        (aw-update)
-        (force-mode-line-update t)
-        (add-hook 'window-configuration-change-hook 'aw-update)
-        (add-hook 'after-make-frame-functions 'aw--after-make-frame t)
-        (advice-add 'aw--lead-overlay :override 'ignore))
-    (progn                              ; Disable
-      (remove-hook 'window-configuration-change-hook 'aw-update)
-      (remove-hook 'after-make-frame-functions 'aw--after-make-frame)
-      (advice-remove 'aw--lead-overlay 'ignore))))
-
-;; (defun +ace-window--mode-line-hint (path leaf)
-;;   (let ((wnd (cdr leaf)))
-;;     (with-selected-window wnd
-;;       ())))
-
-;;;###autoload
-(defun +ace-window-or-switch-buffer (arg)
-  "Call `ace-window' with ARG if more than one window is visible.
-Switch to most recent buffer otherwise."
-  ;; cribbed from `crux-other-window-or-switch-buffer'
-  (interactive "p")
-  (if (one-window-p)
-      (switch-to-buffer nil)
-    (ace-window arg)))
-
-(provide '+ace-window)
-;;; +ace-window.el ends here
-- 
cgit 1.4.1-21-gabe81