From 113c8d05ddee33550ef14ee40e01429ca6dbc0b3 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Fri, 24 Jul 2026 14:57:01 -0700
Subject: emacs: Move ace-window config to init.org

---
 _mbsetupuser/.emacs.d/init.el | 10 ----------
 emacs/.emacs.d/init.org       | 14 +++++++++++++-
 2 files changed, 13 insertions(+), 11 deletions(-)

diff --git a/_mbsetupuser/.emacs.d/init.el b/_mbsetupuser/.emacs.d/init.el
index 6429482..7bfd28d 100644
--- a/_mbsetupuser/.emacs.d/init.el
+++ b/_mbsetupuser/.emacs.d/init.el
@@ -30,16 +30,6 @@
 
 (add-to-list 'default-frame-alist '(ns-transparent-titlebar . t))
 
-(use-package ace-window
-  :bind (("M-o" . ace-window)
-	     ("C-x o"))
-  :custom-face
-  (aw-leading-char-face ((t (:foreground "#222424" :background "#ff9800"))))
-  :custom
-  (aw-keys '(?a ?r ?s ?t ?n ?e ?i ?o))
-  :config
-  (ace-window-posframe-mode))
-
 (use-package menu-bar
   :if (not (eq window-system 'ns))
   :init
diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org
index f93f4e8..01f1bbf 100644
--- a/emacs/.emacs.d/init.org
+++ b/emacs/.emacs.d/init.org
@@ -274,7 +274,19 @@ Highlight diffs in the fringe.
 #+begin_src emacs-lisp
   (use-package ace-window
     :bind (("M-o" . ace-window)
-  	 ("C-x o")))
+  	     ("C-x o"))
+    :custom-face
+    (aw-leading-char-face ((t (:foreground "#222424" :background "#ff9800"))))
+    :custom
+    (aw-keys '(?a ?r ?s ?t ?n ?e ?i ?o))
+    :config
+    (defun oni-core-ace-window-select-other-window (window)
+      "Use ‘ace-window’ to select which window is considered “other”."
+      (interactive)
+      (setq other-window-scroll-buffer window))
+
+    (ace-window-posframe-mode)
+    (add-to-list 'aw-dispatch-alist '(?O oni-core-ace-window-select-other-window "Select window to be \"other\"")))
 #+end_src
 
 * Rest
-- 
cgit v1.3-2-g0d8e