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

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

[elpa] master 4291989 41/68: ace-window.el (ace-maximize-window): Add


From: Oleh Krehel
Subject: [elpa] master 4291989 41/68: ace-window.el (ace-maximize-window): Add
Date: Sat, 21 Mar 2015 19:07:01 +0000

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

    ace-window.el (ace-maximize-window): Add
---
 ace-window.el |   11 +++++++++++
 1 files changed, 11 insertions(+), 0 deletions(-)

diff --git a/ace-window.el b/ace-window.el
index b532cd0..08ae5dd 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -266,6 +266,17 @@ Set mode line to MODE-LINE during the selection process."
   (aw--doit " Ace - Swap Window"))
 
 ;;;###autoload
+(defun ace-maximize-window ()
+  "Ace maximize window."
+  (interactive)
+  (setq aw--current-op
+        (lambda (aj)
+          (let ((wnd (aj-position-window aj)))
+            (select-window wnd)
+            (delete-other-windows))))
+  (aw--doit " Ace - Maximize Window"))
+
+;;;###autoload
 (defun ace-window (arg)
   "Select a window with function `ace-jump-mode'.
 Perform an action based on ARG described below.



reply via email to

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