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

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

[elpa] master db5763f 32/68: ace-window.el (aw-swap-window): improve


From: Oleh Krehel
Subject: [elpa] master db5763f 32/68: ace-window.el (aw-swap-window): improve
Date: Sat, 21 Mar 2015 19:06:58 +0000

branch: master
commit db5763f05cdba4bd111976d6307dbfb1bc388180
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    ace-window.el (aw-swap-window): improve
    
    Can now swap when there are two frames with one window each.
---
 ace-window.el |   11 +++++------
 1 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/ace-window.el b/ace-window.el
index 99fcd64..4c15fe5 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -4,7 +4,7 @@
 
 ;; Author: Oleh Krehel <address@hidden>
 ;; URL: https://github.com/abo-abo/ace-window
-;; Version: 0.5.0
+;; Version: 0.6.0
 ;; Package-Requires: ((ace-jump-mode "2.0"))
 ;; Keywords: cursor, window, location
 
@@ -322,15 +322,14 @@ Windows are numbered top down, left to right."
                   (set-window-buffer window2 buffer1)
                   (select-window window2))))
     (let ((frame (aj-position-frame aj-data))
-          (window (aj-position-window aj-data)))
+          (window (aj-position-window aj-data))
+          (this-window (selected-window)))
       (when (and (frame-live-p frame)
                  (not (eq frame (selected-frame))))
         (select-frame-set-input-focus (window-frame window)))
       (when (and (window-live-p window)
-                 (not (eq window (selected-window))))
-        (swap-windows
-         (get-buffer-window (current-buffer))
-         window)))))
+                 (not (eq window this-window)))
+        (swap-windows this-window window)))))
 
 (defun aw-offset (window)
   "Return point in WINDOW that's closest to top left corner.



reply via email to

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