From b20cbcd5fe0a5f5949316d8bf42c444df3f5c630 Mon Sep 17 00:00:00 2001
From: Thomas Harte <thomas.harte@gmail.com>
Date: Sun, 8 Apr 2018 17:35:02 -0400
Subject: [PATCH] Causes the Vic-20 to obey its own has_c1540 flag.

---
 Machines/Commodore/Vic-20/Vic20.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Machines/Commodore/Vic-20/Vic20.cpp b/Machines/Commodore/Vic-20/Vic20.cpp
index ef118bcdb..0ad87a11c 100644
--- a/Machines/Commodore/Vic-20/Vic20.cpp
+++ b/Machines/Commodore/Vic-20/Vic20.cpp
@@ -374,7 +374,7 @@ class ConcreteMachine:
 				type_string(target->loading_command);
 			}
 
-			if(target->media.disks.size()) {
+			if(commodore_target_.has_c1540) {
 				// construct the 1540
 				c1540_.reset(new ::Commodore::C1540::Machine(Commodore::C1540::Machine::C1540));