IBM1130: Give notepad a chance to open its file before proceeding

2026-02-26 08:44:38 +00:00 · 2017-05-12 06:21:49 -07:00
parent d0bd4fbdff
commit ab4ee75961
1 changed files with 1 additions and 0 deletions
--- a/Ibm1130/ibm1130_cpu.c
+++ b/Ibm1130/ibm1130_cpu.c
@@ -1941,6 +1941,7 @@ static t_stat view_cmd (int32 flag, CONST char *cptr)

    sprintf(cmdline, "notepad %s", cptr);
    WinExec(cmdline, SW_SHOWNORMAL);
+    Sleep(1000);                        /* wait a bit to allow notepad to open the file */
 #endif
    return SCPE_OK;
 }