From 697acab07b5f873246b128128f6d415d3f21b889 Mon Sep 17 00:00:00 2001 From: Richard Wilson Date: Mon, 17 Jul 2006 17:32:06 +0000 Subject: Implement Ctrl+U, Ctrl+Up, Ctrl+Down. svn path=/trunk/netsurf/; revision=2774 --- riscos/textarea.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'riscos/textarea.c') diff --git a/riscos/textarea.c b/riscos/textarea.c index a0cc77e9c..b3176be93 100644 --- a/riscos/textarea.c +++ b/riscos/textarea.c @@ -956,6 +956,11 @@ bool textarea_key_press(wimp_key *key) redraw = true; } break; + case 21: /* Ctrl + U */ + textarea_set_text((uintptr_t)ta, ""); + textarea_set_caret((uintptr_t)ta, 0); + redraw = true; + break; case wimp_KEY_DELETE: c_pos = textarea_get_caret((uintptr_t)ta); if (os_version < RISCOS5 && c_pos > 0) { @@ -993,10 +998,10 @@ bool textarea_key_press(wimp_key *key) /** \todo line end */ break; case wimp_KEY_CONTROL | wimp_KEY_UP: - /** \todo area start */ + textarea_set_caret((uintptr_t)ta, 0); break; case wimp_KEY_CONTROL | wimp_KEY_DOWN: - /** \todo area end */ + textarea_set_caret((uintptr_t)ta, ta->text_len); break; case wimp_KEY_COPY: -- cgit v1.2.3