From: Pasi Kallinen <paxed@alt.org>
Date: Mon, 13 Mar 2017 18:32:43 +0000 (+0200)
Subject: Show control key combos with uppercase alpha
X-Git-Tag: NetHack-3.6.1_RC01~512
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=08fe086124838cd6d9b4914ad7899e0c179da134;p=nethack

Show control key combos with uppercase alpha

Instead of ^r, show ^R, as that one is used everywhere.
---

diff --git a/src/cmd.c b/src/cmd.c
index bf2c80e30..79e096249 100644
--- a/src/cmd.c
+++ b/src/cmd.c
@@ -3741,7 +3741,7 @@ char *txt; /* sufficiently long buffer */
     else if (c == '\n')
         Sprintf(txt, "<enter>");
     else if (ISCTRL(c))
-        Sprintf(txt, "^%c", UNCTRL(c));
+        Sprintf(txt, "^%c", highc(UNCTRL(c)));
     else if (ISMETA(c))
         Sprintf(txt, "M-%c", UNMETA(c));
     else if (c >= 33 && c <= 126)