1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-02 21:11:22 +00:00

Fixes warnings showing when IDEShowErrorsImmediately is set to false.

This commit is contained in:
FellippeHeitor 2019-01-14 18:42:51 -02:00
parent dbec9fae0d
commit 018e711820

View file

@ -642,12 +642,14 @@ FUNCTION ide2 (ignore)
IF c$ <> CHR$(3) THEN
COLOR 7, 1: LOCATE idewy - 3, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 2, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 1, 2: PRINT SPACE$(idewx - 2); 'clear status window
IF ready THEN
IF IDEShowErrorsImmediately THEN LOCATE idewy - 3, 2: PRINT "OK"; 'report OK status
IF totalWarnings > 0 THEN
COLOR 11, 1
PRINT " ("; LTRIM$(STR$(totalWarnings)) + " warning";
IF totalWarnings > 1 THEN PRINT "s";
PRINT " - click here or Ctrl+W to view)";
IF IDEShowErrorsImmediately THEN
LOCATE idewy - 3, 2: PRINT "OK"; 'report OK status
IF totalWarnings > 0 THEN
COLOR 11, 1
PRINT " ("; LTRIM$(STR$(totalWarnings)) + " warning";
IF totalWarnings > 1 THEN PRINT "s";
PRINT " - click here or Ctrl+W to view)";
END IF
END IF
END IF
IF showexecreated THEN