From 09ff950a94fd73eca074aefbf8029ccac8ad22ae Mon Sep 17 00:00:00 2001
From: =?utf8?q?R=C3=BCdiger=20Sonderfeld?= <ruediger@c-plusplus.de>
Date: Tue, 9 Mar 2010 20:56:40 +0100
Subject: [PATCH] emacs bindings: added M-d (kill word)

---
 src/uisupport/multilineedit.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/uisupport/multilineedit.cpp b/src/uisupport/multilineedit.cpp
index b856954f..ab1834f2 100644
--- a/src/uisupport/multilineedit.cpp
+++ b/src/uisupport/multilineedit.cpp
@@ -371,6 +371,12 @@ void MultiLineEdit::keyPressEvent(QKeyEvent *event) {
       case Qt::Key_Greater:
         moveCursor(QTextCursor::End);
         return;
+
+        // modify
+      case Qt::Key_D:
+        moveCursor(QTextCursor::WordRight, QTextCursor::KeepAnchor);
+        cut();
+        return;
       }
     }
   }
-- 
2.20.1