From 786aff40677e9219f4666a1fa7dc8f32ae4f7dbe Mon Sep 17 00:00:00 2001
From: Gergely Polonkai <gergely@polonkai.eu>
Date: Tue, 7 Oct 2014 23:49:44 +0200
Subject: [PATCH] Add delete-current-line interactive function

---
 init.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/init.el b/init.el
index 16cc28e..f04a09a 100644
--- a/init.el
+++ b/init.el
@@ -209,3 +209,9 @@
 (setq rcirc-default-user-name "polesz")
 (setq rcirc-default-full-name "Gergely Polonkai")
 (add-hook 'after-init-hook 'fiplr-clear-cache)
+
+(defun delete-current-line ()
+  "Kill the whole line on which point is"
+  (interactive)
+  (beginning-of-line)
+  (kill-line 1))