cycle kill ring backwards or forwards

This commit is contained in:
2011-09-27 12:01:37 +01:00
parent e9476fa516
commit ed2fa3721b
2 changed files with 7 additions and 0 deletions

View File

@@ -37,6 +37,10 @@
(newline)
(yank))
;; Yank Pop Forwards
(defun yank-pop-forwards (arg)
(interactive "p")
(yank-pop (- arg)))
;; Window Switching
(defun other-window-reverse ()

View File

@@ -35,6 +35,9 @@
(global-set-key (kbd "C-x C-o") 'other-window) ;; other-window
(global-set-key (kbd "C-x C-i") 'other-window-reverse) ;; other-window -1
;; Kill-Ring related.
(global-set-key (kbd "M-Y") 'yank-pop-forwards)
;; ElScreen related shortcuts
(global-set-key (kbd "s-}") 'elscreen-next)
(global-set-key (kbd "s-{") 'elscreen-previous)