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

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

[elpa] externals/buffer-expose 03fc259 17/38: Fix ordering of buffer vie


From: Clemens Radermacher
Subject: [elpa] externals/buffer-expose 03fc259 17/38: Fix ordering of buffer view (left>right, top>down)
Date: Mon, 25 Feb 2019 13:38:00 -0500 (EST)

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

    Fix ordering of buffer view (left>right, top>down)
---
 buffer-expose.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/buffer-expose.el b/buffer-expose.el
index 737f618..c03e6e9 100644
--- a/buffer-expose.el
+++ b/buffer-expose.el
@@ -394,15 +394,17 @@ Windows are orderd by `buffer-expose--next-window'."
         (window-combination-resize t)
         (ws (list (selected-window))))
     (delete-other-windows)
+    (dotimes (_ (1- y))
+      (split-window-vertically)
+      (dotimes (_ (1- x))
+        (push (split-window-horizontally) ws)
+        (other-window 1))
+      (other-window 1)
+      (push (selected-window) ws))
     (dotimes (_ (1- x))
       (push (split-window-horizontally) ws)
-      (dotimes (_ (1- y))
-        (push (split-window-vertically) ws))
-      (other-window y))
-    (dotimes (_ (1- y))
-      (push (split-window-vertically) ws))
+      (other-window 1))
     (balance-windows)
-    ;; TODO: order left to right
     (setq buffer-expose--window-list
           (nreverse ws))))
 



reply via email to

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