Fixed bug 77 (make ^space and M-space work)

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@4217 35c25a1d-7b9e-4130-9fde-d3aeb78583b8

diff --git a/BUGS b/BUGS
index 61d61e8c26370ada3336667ed63a594d0b82a7b7..ee6fd273e94ef30853c60c3434487155a282d9df 100644 (file)
--- a/BUGS
+++ b/BUGS
@@ -8,7 +8,6 @@
   of new if block for subnfunc values (75)
 - New backend code probably does not compile under anything but default options, 
   if that (76)
-- Meta-space and ^Space are not yet handled  in new backend code (77)
 - -enable-tiny does not work with new code (78)
 
 
@@ -151,5 +150,6 @@
 - Home and End control keys (^A, ^E) do not always work in filename
   prompt (bug found by Ian Turner) (69) [1.0 series only] [FIXED].
 - Trying to insert a file of 0 bytes will hang nano (70) [FIXED].
+- Meta-space and ^Space are not yet handled  in new backend code (77) [FIXED]
 
 $Id$

diff --git a/src/global.c b/src/global.c
index e33fde0d9bdc79e5991493e4427bd10382d00457..e3f455b6705c8fad13840e5dbb428ed75310e216 100644 (file)
--- a/src/global.c
+++ b/src/global.c
@@ -318,6 +318,13 @@ void assign_keyinfo(sc *s)
         s->seq = KEY_F0 + atoi(&s->keystr[1]);
     } else /* raw */
         s->seq = (int) s->keystr[0];
+
+    /* Override some keys which don't bind as nicely as we'd like */
+    if (s->type == CONTROL && (!strcasecmp(&s->keystr[1], "space")))
+       s->seq = 0;
+    else if (s->type == META && (!strcasecmp(&s->keystr[2], "space")))
+       s->seq = (int) ' ';
+
 }
 
 #ifdef DEBUG