From: Andreas Gerler <baron@bundesbrandschatzamt.de>
Date: Wed, 15 Mar 2017 10:35:10 +0000 (+0100)
Subject: added remove element from kill-ring
X-Git-Url: http://git.bundesbrandschatzamt.de/?a=commitdiff_plain;h=f9db6d19ff8c3981c8e2abf0b7232b3519b9e9fe;p=emacsconfig.git

added remove element from kill-ring

- to avoid storing secrets in not so secret places.

Signed-off-by: Andreas Gerler <baron@bundesbrandschatzamt.de>
---

diff --git a/bba.org b/bba.org
index 1fd3c9d2..fe79b1b5 100644
--- a/bba.org
+++ b/bba.org
@@ -2765,6 +2765,29 @@ line or somewhere else.
     )
 #+END_SRC
 
+* remove element from kill-ring
+[2017-02-15 Wed 11:59]
+
+sometimes you have credentials or other secret stuff in your kill-ring.
+savehist is nice but you don't want to store it in the history.
+
+#+BEGIN_SRC emacs-lisp :tangle yes
+  (defun bba-rm-kill-ring ()
+  "remove current element from kill-ring."
+  (interactive)
+  (progn (pop kill-ring) nil)
+  (message  "removed item from kill-ring")
+  )
+
+  (defun bba-yank-rm-kill-ring ()
+  "yank and then remove element from kill ring"
+  (interactive)
+  (insert (pop kill-ring))
+  )
+  (define-key global-map (kbd "s-y") 'bba-yank-rm-kill-ring)
+  (define-key global-map (kbd "s-Y") 'bba-rm-kill-ring)
+
+#+END_SRC
 
 * ggtags