From 5902f9672d54b7665b648e44b2061a6e47cfd5f5 Mon Sep 17 00:00:00 2001
From: Chris Allegretta <chrisa@asty.org>
Date: Thu, 7 Mar 2002 12:40:39 +0000
Subject: [PATCH] - nano.c:help_init() - Capitalize Meta altkeys

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@1115 35c25a1d-7b9e-4130-9fde-d3aeb78583b8
---
 ChangeLog | 2 ++
 nano.c    | 4 ++++
 2 files changed, 6 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 645a67e5..4df48f2c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -6,6 +6,8 @@ CVS code -
   check_writable_directory()
 	- Stat full_path, not path (Steven Kneizys).
 - nano.c:
+  help_init()
+	- Capitalize Meta altkeys.
   main()
 	- Put NANO_SMALL defines around toggle pointer (noticed by Jordi);
 - rcfile.c:
diff --git a/nano.c b/nano.c
index 49ba10b3..9042dbb2 100644
--- a/nano.c
+++ b/nano.c
@@ -2622,6 +2622,10 @@ void help_init(void)
 	    sofar += snprintf(&buf[sofar], BUFSIZ - sofar,
 	    (meta_shortcut ? "M-%c	" : "(M-%c)	"),
 	    s->altval - 32);
+	else if (s->altval >= 'a')
+	    sofar += snprintf(&buf[sofar], BUFSIZ - sofar,
+	    (meta_shortcut ? "M-%c	" : "(M-%c)	"),
+	    s->altval - 32);
 	else if (s->altval > 0)
 	    sofar += snprintf(&buf[sofar], BUFSIZ - sofar,
 	    (meta_shortcut ? "M-%c	" : "(M-%c)	"),