diff --git a/src/system/disk.1227 b/src/system/disk.1228
similarity index 99%
rename from src/system/disk.1227
rename to src/system/disk.1228
index 6b9e196b..4daf355c 100644
--- a/src/system/disk.1227
+++ b/src/system/disk.1228
@@ -5504,7 +5504,9 @@ QMDW:	SKIPGE QACT(Q)
 	JRST QINT1
 
 QMDWA:	AOBJN Q,QMDW
-QTDW:	SKIPG QACTTM
+QTDW:	SKIPGE SHUTDN
+         JRST .+3
+        SKIPG QACTTM
 	 JRST QUDW
 	MOVSI Q,-NQS
 QTDW1:	SKIPGE QACT(Q)