From c2f20b945a10d2682aa3484861b76e598fd1273e Mon Sep 17 00:00:00 2001
From: Gary Williams <gw3@ebi.ac.uk>
Date: Mon, 7 Sep 2020 12:18:55 +0100
Subject: [PATCH] don't delete ancient version of DATABASES/ autoace

---
 scripts/finish_build.pl | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/scripts/finish_build.pl b/scripts/finish_build.pl
index 9325a9f85..ff3a410de 100755
--- a/scripts/finish_build.pl
+++ b/scripts/finish_build.pl
@@ -134,18 +134,18 @@
 #############################################################################
 # Step 5: remove very old data from DATABASE directory
 #############################################################################
-print STDERR "Removing old releases\n";
-for(my $ws = $WS_current - 5; $ws >=1 ; $ws--) {
-  my $old_name = "WS{$ws}";
-  my $old_path = $wormbase->wormpub . "/DATABASES/$old_name";
-  if (-d $old_path) {
-    if ($test) {
-      print STDERR "TEST: would have deleted $old_path\n";
-    } else {
-      $wormbase->run_command("rm -fr $old_path", 'no_log');
-    }
-  }
-}
+#print STDERR "Removing old releases\n";
+#for(my $ws = $WS_current - 5; $ws >=1 ; $ws--) {
+#  my $old_name = "WS{$ws}";
+#  my $old_path = $wormbase->wormpub . "/DATABASES/$old_name";
+#  if (-d $old_path) {
+#    if ($test) {
+#      print STDERR "TEST: would have deleted $old_path\n";
+#    } else {
+#      $wormbase->run_command("rm -fr $old_path", 'no_log');
+#    }
+#  }
+#}
 
 #############################################################################
 # Step 6: zip up files from remaining old directories