From 6cc36e1561ab7de2c3cd6fbcd765542b006eb5c7 Mon Sep 17 00:00:00 2001
From: Elliot Nunn <elliotnunn@me.com>
Date: Sun, 4 Apr 2021 08:06:38 +0800
Subject: [PATCH] Get rid of "Make Disk" until implemented

---
 ServerDA.a | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/ServerDA.a b/ServerDA.a
index a55a692..7ccec8a 100644
--- a/ServerDA.a
+++ b/ServerDA.a
@@ -202,6 +202,7 @@ Init
         dc.w    $A954           ; _NewControl
         move.l  (SP)+,gCloseBtn(A4)
 
+        if 0
         subq    #4,SP
         move.l  A4,-(SP)        ; theWindow
         pea     DiskBtnRect     ; boundsRect
@@ -212,6 +213,7 @@ Init
         move.l  #DiskBtn-DAEntry,-(SP)  ; refCon
         dc.w    $A954           ; _NewControl
         move.l  (SP)+,gDiskBtn(A4)
+        endif
 
         subq    #4,SP
         pea     theList         ; rView