From 22b2c8a867e609801a9d8213aa73cecc05d405e3 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Tue, 16 Apr 2019 18:16:40 -0700
Subject: [PATCH] re-enable Pascal, Datasoft, RDOS, etc.

---
 src/id/inspect0.a | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/src/id/inspect0.a b/src/id/inspect0.a
index 41d6fe2..0067ffb 100755
--- a/src/id/inspect0.a
+++ b/src/id/inspect0.a
@@ -215,18 +215,16 @@ IDBootloader
          lda   #TRUE
          sta   gIsProDOS
          jsr   IDVolumeName
-         bcc   +
-         jmp   UseUniversal
-+
+         bcs   .useuniv
+
 ;
 ; Dinkey-DOS (ProDOS file structure with DOS 3.3-ish RWTS in language card)
 ; detectable now because IDVolumeName just read the first sector of the
 ; volume directory into memory so we can look for a unique filename
 ;
          jsr   IDDinkeyDOS
-         bcc   +
-         jmp   UseUniversal
-+        lda   #s_dinkeydos
+         bcs   .useuniv
+         lda   #s_dinkeydos
          jsr   PrintByID
          lda   #TRUE
          sta   gIsDinkeyDOS