From ed2fa3721b0e8fdf80a9c645a86dc99b44b4f183 Mon Sep 17 00:00:00 2001
From: Jim Myhrberg <contact@jimeh.me>
Date: Tue, 27 Sep 2011 12:01:37 +0100
Subject: [PATCH] cycle kill ring backwards or forwards

---
 helpers.el     | 4 ++++
 keybindings.el | 3 +++
 2 files changed, 7 insertions(+)

diff --git a/helpers.el b/helpers.el
index 7b66946..3788f93 100644
--- a/helpers.el
+++ b/helpers.el
@@ -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 ()
diff --git a/keybindings.el b/keybindings.el
index 2cda82d..adf9512 100644
--- a/keybindings.el
+++ b/keybindings.el
@@ -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)