File tree Expand file tree Collapse file tree 1 file changed +4
-3
lines changed Expand file tree Collapse file tree 1 file changed +4
-3
lines changed Original file line number Diff line number Diff line change 6262; ;; Code:
6363(require 'ace-jump-mode )
6464
65- ; ; ——— Customization ———————————————————————————————————————————————————————————
65+ ; ;* Customization
6666(defgroup ace-window nil
6767 " Quickly switch current window."
6868 :group 'convenience
@@ -94,6 +94,7 @@ Use M-0 `ace-window' to toggle this value."
9494 '((t (:inherit ace-jump-face-foreground)))
9595 " Face for each window's leading char." )
9696
97+ ; ;* Implementation
9798(defun aw-ignored-p (window )
9899 " Return t if WINDOW should be ignored."
99100 (and aw-ignore-on
@@ -243,7 +244,7 @@ Amend MODE-LINE to the mode line for the duration of the selection."
243244 (prog1 (selected-window )
244245 (select-window start-window))))
245246
246- ; ; ——— Interactive —————————————————————————————————————————————————————————————
247+ ; ;* Interactive
247248;;;### autoload
248249(defun ace-select-window ()
249250 " Ace select window."
@@ -297,7 +298,7 @@ window."
297298 (16 (ace-delete-window))
298299 (t (ace-select-window))))
299300
300- ; ; ——— Utility —————————————————————————————————————————————————————————————————
301+ ; ;* Utility
301302(defun aw-visual-area< (va1 va2 )
302303 " Return true if visual area VA1 is less than VA2.
303304This is determined by their respective window coordinates.
You can’t perform that action at this time.
0 commit comments