diff options
| -rw-r--r-- | wince/perlmain.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/wince/perlmain.c b/wince/perlmain.c index cebbfb3d0f..ced3b86cc0 100644 --- a/wince/perlmain.c +++ b/wince/perlmain.c @@ -16,6 +16,8 @@ int _CRT_glob = 0; /* Called from w32console/wmain.c */ +extern int w32console_usefunctionkeys; + int main(int argc, char **argv, char **env) { @@ -25,6 +27,8 @@ main(int argc, char **argv, char **env) XCEShowMessageA("Starting perl with no args is currently\r\n" "not useful on Windows CE"); + w32console_usefunctionkeys = 0; /* this allows backspace key to work */ + res = RunPerl(argc, argv, env); if(res != 0) |