From b8779e714a18b00e5c3f8172e1c425570ff8acf0 Mon Sep 17 00:00:00 2001
From: Lukas Fleischer <calcurse@cryptocrack.de>
Date: Thu, 4 Nov 2010 10:55:07 +0000
Subject: Added "backword-kill-word" functionality to getstring().

---
 ChangeLog   |  5 +++++
 src/utils.c | 21 ++++++++++++++++++++-
 2 files changed, 25 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 1514337..de62c30 100755
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-11-04  Lukas Fleischer  <calcurse@cryptocrack.de>
+
+	* src/utils.c: Added "backword-kill-word" functionality to
+	getstring().
+
 2010-11-01  Lukas Fleischer  <calcurse@cryptocrack.de>
 
 	* src/calcurse.1
diff --git a/src/utils.c b/src/utils.c
index d18b8bc..243de4c 100755
--- a/src/utils.c
+++ b/src/utils.c
@@ -1,4 +1,4 @@
-/*	$calcurse: utils.c,v 1.85 2010/10/23 10:25:53 culot Exp $	*/
+/*	$calcurse: utils.c,v 1.86 2010/11/04 10:55:07 fleischer Exp $	*/
 
 /*
  * Calcurse - text-based organizer
@@ -362,6 +362,25 @@ getstring (WINDOW *win, char *str, int l, int x, int y)
 	    printf ("\a");
 	  break;
 
+  case CTRL ('W'):	/* delete a word */
+    while (len > 0 && newpos > x && *(orig + newpos - 1) == ' ') {
+      --newpos;
+      --len;
+      if (newpos >= x + len)
+        --str;
+      else
+        del_char (newpos, orig);
+    }
+    while (len > 0 && newpos > x && *(orig + newpos - 1) != ' ') {
+      --newpos;
+      --len;
+      if (newpos >= x + len)
+        --str;
+      else
+        del_char (newpos, orig);
+    }
+    break;
+
 	case CTRL ('K'):	/* delete to end-of-line */
 	  str = orig + newpos;
 	  *str = 0;
-- 
cgit v1.2.3-54-g00ecf