emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/buffer-expose c0034f5 26/38: Code reordering


From: Clemens Radermacher
Subject: [elpa] externals/buffer-expose c0034f5 26/38: Code reordering
Date: Mon, 25 Feb 2019 13:38:02 -0500 (EST)

branch: externals/buffer-expose
commit c0034f591ccfed2a9ed8bdb872b619718d94e5cf
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Code reordering
---
 buffer-expose.el | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/buffer-expose.el b/buffer-expose.el
index 4821758..7f1594d 100644
--- a/buffer-expose.el
+++ b/buffer-expose.el
@@ -786,6 +786,15 @@ show per page, which defaults to 
`buffer-expose-max-num-windows'."
 
 ;; * grid commands
 
+
+(defun buffer-expose--last-to (dir &optional f)
+  "Get last window in direction DIR from window F."
+  (let ((w (or f (selected-window)))
+        (nw nil))
+    (while (setq w (window-in-direction dir w))
+      (setq nw w))
+    nw))
+
 (defun buffer-expose--first-window-in-col (&optional f)
   "Get first window in column of window F.
 
@@ -810,14 +819,6 @@ F defaults to the currently selected window."
 F defaults to the currently selected window."
   (buffer-expose--last-to 'right f))
 
-(defun buffer-expose--last-to (dir &optional f)
-  "Get last window in direction DIR from window F."
-  (let ((w (or f (selected-window)))
-        (nw nil))
-    (while (setq w (window-in-direction dir w))
-      (setq nw w))
-    nw))
-
 (defun buffer-expose--get-current-row (&optional f)
   "Get row of window F.
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]