From 365c48e0e50957f6f38ebb3bb6b39aa1f5584ea9 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Sun, 24 Nov 2024 16:16:56 -0500 Subject: Fixed some typos that apparently effected DR DOS detection --- gwfetch.bas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gwfetch.bas') diff --git a/gwfetch.bas b/gwfetch.bas index aaf9041..e1818d2 100644 --- a/gwfetch.bas +++ b/gwfetch.bas @@ -39,7 +39,7 @@ 510 DIM LOGO$(25) 520 IF DOSBOX = 1 THEN GOSUB 20050:GOTO 1000 530 IF OEM% = &HEE OR OEM% = &HEF THEN GOSUB 20100:GOTO 1000 -530 GOSUB 20000 +540 GOSUB 20000 1000 REM Output time 1001 CLS @@ -92,7 +92,7 @@ 10020 OPEN TMPFILE$ FOR INPUT AS #2 10030 IF EOF(2) THEN GOTO 10060 10040 INPUT#2, VERLINE$ -10050 IF LEN(G$) = 0 THEN GOTO 10030 ELSE GOTO 10060 +10050 IF LEN(VERLINE$) = 0 THEN GOTO 10030 ELSE GOTO 10060 10060 CLOSE#2 10070 REM VERLINE$ now contains the first non-blank version 10080 REM output. Technically it is just the command -- cgit v1.2.3