[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.
- [elpa] externals/buffer-expose 69bfeb1 15/38: Add binding for no stars, (continued)
- [elpa] externals/buffer-expose 69bfeb1 15/38: Add binding for no stars, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose d05d136 27/38: Handle window configurations internally, don't use set-window-config, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose adeb508 35/38: Docstring fixes, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 260a2ed 20/38: Replace `windmove` with package commands, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 713238b 38/38: Checkdoc fixes, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 07cea91 31/38: Code refactoring, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose f3fd7fa 13/38: Add command omitting star buffers, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 8dec782 07/38: Require cl-lib, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose ea8d671 11/38: Fix regex list type, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose e78ca06 21/38: Cleanup, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose c0034f5 26/38: Code reordering,
Clemens Radermacher <=
- [elpa] externals/buffer-expose 5748ffb 34/38: Update docstrings, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose c5eb139 16/38: Add custom command example, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose e52f55d 06/38: Filter completions buffer by default, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 07ac8cf 12/38: Create window list without redisplay, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 428568c 09/38: Add regex option for buffers to hide, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 814a557 36/38: Fix copyright, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 03fc259 17/38: Fix ordering of buffer view (left>right, top>down), Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 963b107 33/38: Update description, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose 5e58e22 19/38: Refactor buffer-expose--other-window, Clemens Radermacher, 2019/02/25
- [elpa] externals/buffer-expose eebf28a 30/38: Cleanup, Clemens Radermacher, 2019/02/25