From 2fa6de5a3de759f130b9ad675f979bdeeab1603b Mon Sep 17 00:00:00 2001
From: Mark Hessling <mark@rexx.org>
Date: Sat, 7 Aug 2004 04:36:05 +0000
Subject: [PATCH] Fix bug 1001994; S-TAB under Win32 now works

---
 win32/pdckbd.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/win32/pdckbd.c b/win32/pdckbd.c
index 2f10ae8d..cd748685 100644
--- a/win32/pdckbd.c
+++ b/win32/pdckbd.c
@@ -25,7 +25,7 @@
 #include <stdio.h>
 
 #ifdef PDCDEBUG
-char *rcsid_PDCkbd  = "$Id: pdckbd.c,v 1.12 2004/07/01 07:21:13 rexx Exp $";
+char *rcsid_PDCkbd  = "$Id: pdckbd.c,v 1.13 2004/08/07 04:36:05 rexx Exp $";
 #endif
 
 #define KEY_STATE TRUE
@@ -581,6 +581,8 @@ int   PDC_get_bios_key(void)
                   return kptab[idx].control;
                if ( local_key_modifiers & PDC_KEY_MODIFIER_ALT )
                   return kptab[idx].alt;
+               if ( local_key_modifiers & PDC_KEY_MODIFIER_SHIFT )
+                  return kptab[idx].shift;
                return (int)save_ip.Event.KeyEvent.uChar.UnicodeChar;
             }