]> git.bundesbrandschatzamt.de Git - emacsconfig.git/commitdiff
Bind shift f3 and f4 to previous/next frame.
authorAndreas Gerler <baronNOSPAMbundesbrandschatzamt.de>
Tue, 9 Feb 2016 09:45:18 +0000 (10:45 +0100)
committerAndreas Gerler <baronNOSPAMbundesbrandschatzamt.de>
Tue, 9 Feb 2016 09:45:18 +0000 (10:45 +0100)
As we use already f3/f4 for previous/next window.

bba.org

diff --git a/bba.org b/bba.org
index 9acddd2a0d5078b569fdf2fa8e756a18cbb319d1..7a956d3b61f4e1b0bd5c2d63ff87d4fc38820f50 100644 (file)
--- a/bba.org
+++ b/bba.org
@@ -1738,6 +1738,8 @@ With modifications by [[http://sachachua.com/blog/2011/12/emacs-artbollocks-mode
     [2014-09-24 Wed 13:03]
 
 Bind f3 and f4 to previous/next pane.
+Bind shift f3 and shift f4 to previous/next frame.
+
 #+BEGIN_SRC emacs-lisp
   (defun move-cursor-next-pane ()
     "Move cursor to the next pane."
@@ -1749,8 +1751,20 @@ Bind f3 and f4 to previous/next pane.
     (interactive)
     (other-window -1))
 
+  (defun move-cursor-next-frame ()
+    "Move cursor to the next frame."
+    (interactive)
+    (other-frame 1))
+
+  (defun move-cursor-previous-frame ()
+    "Move cursor to the previous frame."
+    (interactive)
+    (other-frame -1))
+
   (global-set-key (kbd "<f3>") 'move-cursor-previous-pane)
+  (global-set-key (kbd "S-<f3>") 'move-cursor-previous-frame)
   (global-set-key (kbd "<f4>") 'move-cursor-next-pane)
+  (global-set-key (kbd "S-<f4>") 'move-cursor-next-frame)
 #+END_SRC
 
 * [[https://github.com/dotemacs/ipcalc.el][ipcalc]]