From 729edeac6c8b8876f39b37f7f1af0bfc3103caa3 Mon Sep 17 00:00:00 2001
From: Thomas Harte <thomas.harte@gmail.com>
Date: Sat, 27 Mar 2021 18:08:46 -0400
Subject: [PATCH] Ensure CPC and Spectrum update fast-tape flag upon media
 insertion.

---
 Machines/AmstradCPC/AmstradCPC.cpp          | 1 +
 Machines/Sinclair/ZXSpectrum/ZXSpectrum.cpp | 1 +
 2 files changed, 2 insertions(+)

diff --git a/Machines/AmstradCPC/AmstradCPC.cpp b/Machines/AmstradCPC/AmstradCPC.cpp
index 316a5d3f7..32c0647a3 100644
--- a/Machines/AmstradCPC/AmstradCPC.cpp
+++ b/Machines/AmstradCPC/AmstradCPC.cpp
@@ -1088,6 +1088,7 @@ template <bool has_fdc> class ConcreteMachine:
 			// If there are any tapes supplied, use the first of them.
 			if(!media.tapes.empty()) {
 				tape_player_.set_tape(media.tapes.front());
+				set_use_fast_tape_hack();
 			}
 
 			// Insert up to four disks.
diff --git a/Machines/Sinclair/ZXSpectrum/ZXSpectrum.cpp b/Machines/Sinclair/ZXSpectrum/ZXSpectrum.cpp
index e16fa633d..6eb5aab6a 100644
--- a/Machines/Sinclair/ZXSpectrum/ZXSpectrum.cpp
+++ b/Machines/Sinclair/ZXSpectrum/ZXSpectrum.cpp
@@ -432,6 +432,7 @@ template<Model model> class ConcreteMachine:
 			// If there are any tapes supplied, use the first of them.
 			if(!media.tapes.empty()) {
 				tape_player_.set_tape(media.tapes.front());
+				set_use_fast_tape();
 			}
 
 			// Insert up to four disks.