fix Spiradisc and E7

src/id/inspect0.a

@@ -341,6 +341,9 @@ IDBootFailure
 
 VerifyInfocom18
          lda   $C0E9
+         lda   #2
+         sta   modsrc
+
 .retry13
          ldx   #$1A       ; the length of a track
          ldy   #0
@@ -355,6 +358,8 @@ VerifyInfocom18
          rts
 
 .badsect
+         dec   modsrc
+         beq   .no
          lda   gIsInfocom18
          beq   .no        ; if in Infocom mode already then we have a true failure
          bne   .retry13   ; otherwise, try to identify 13-sector instead

src/patchers/universale7.a

@@ -12,7 +12,7 @@ universale7
          bpl   .exit
          lda   #BASEPAGE+$0F
          sta   .sector+2
-         ldx   #$A0
+.search  ldx   #$A0
          lda   #$00
 .eor     eor   #$AC
 .sector  cmp   $D100,x    ; modified at runtime
@@ -37,6 +37,6 @@ universale7
          dec   .sector+2
          lda   .sector+2
          cmp   #BASEPAGE-1
-         bne   .sector
+         bne   .search
 .exit
 }

src/strings/en.a

@@ -280,7 +280,7 @@ StringTableHigh
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2019-04-17",$00
+         !text "Passport by 4am               2019-04-19",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "