From ff888032eba2a02afb7fe6265e4325bc9467eafc Mon Sep 17 00:00:00 2001
From: Graham Christensen <graham@grahamc.com>
Date: Sun, 24 Oct 2021 21:38:04 -0400
Subject: [PATCH] SystemTypes: drop database table. It was originally removed
 in #65, but put back in fcd511c4de79c09183177b854a605f3c8a2eaa5e, and now
 totally unused.

---
 src/lib/Hydra/Schema/Result/SystemTypes.pm | 74 ----------------------
 src/sql/hydra.sql                          |  7 --
 src/sql/update-dbix.pl                     |  1 -
 src/sql/upgrade-78.sql                     |  1 +
 4 files changed, 1 insertion(+), 82 deletions(-)
 delete mode 100644 src/lib/Hydra/Schema/Result/SystemTypes.pm
 create mode 100644 src/sql/upgrade-78.sql

diff --git a/src/lib/Hydra/Schema/Result/SystemTypes.pm b/src/lib/Hydra/Schema/Result/SystemTypes.pm
deleted file mode 100644
index 6b606263..00000000
--- a/src/lib/Hydra/Schema/Result/SystemTypes.pm
+++ /dev/null
@@ -1,74 +0,0 @@
-use utf8;
-package Hydra::Schema::Result::SystemTypes;
-
-# Created by DBIx::Class::Schema::Loader
-# DO NOT MODIFY THE FIRST PART OF THIS FILE
-
-=head1 NAME
-
-Hydra::Schema::Result::SystemTypes
-
-=cut
-
-use strict;
-use warnings;
-
-use base 'DBIx::Class::Core';
-
-=head1 COMPONENTS LOADED
-
-=over 4
-
-=item * L<Hydra::Component::ToJSON>
-
-=back
-
-=cut
-
-__PACKAGE__->load_components("+Hydra::Component::ToJSON");
-
-=head1 TABLE: C<systemtypes>
-
-=cut
-
-__PACKAGE__->table("systemtypes");
-
-=head1 ACCESSORS
-
-=head2 system
-
-  data_type: 'text'
-  is_nullable: 0
-
-=head2 maxconcurrent
-
-  data_type: 'integer'
-  default_value: 2
-  is_nullable: 0
-
-=cut
-
-__PACKAGE__->add_columns(
-  "system",
-  { data_type => "text", is_nullable => 0 },
-  "maxconcurrent",
-  { data_type => "integer", default_value => 2, is_nullable => 0 },
-);
-
-=head1 PRIMARY KEY
-
-=over 4
-
-=item * L</system>
-
-=back
-
-=cut
-
-__PACKAGE__->set_primary_key("system");
-
-
-# Created by DBIx::Class::Schema::Loader v0.07049 @ 2021-08-26 12:02:36
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:skzz9Wqwox5QO35YSgVXbw
-
-1;
diff --git a/src/sql/hydra.sql b/src/sql/hydra.sql
index 0acbc537..e172302b 100644
--- a/src/sql/hydra.sql
+++ b/src/sql/hydra.sql
@@ -440,13 +440,6 @@ create table CachedCVSInputs (
     primary key   (uri, module, sha256hash)
 );
 
-
--- FIXME: remove
-create table SystemTypes (
-    system        text primary key not null,
-    maxConcurrent integer not null default 2
-);
-
 create table EvaluationErrors (
     id            serial primary key not null,
     errorMsg      text,    -- error output from the evaluator
diff --git a/src/sql/update-dbix.pl b/src/sql/update-dbix.pl
index 8490ca3c..07c2d74a 100644
--- a/src/sql/update-dbix.pl
+++ b/src/sql/update-dbix.pl
@@ -40,7 +40,6 @@ make_schema_at("Hydra::Schema", {
         "schemaversion" => "SchemaVersion",
         "starredjobs" => "StarredJobs",
         "systemstatus" => "SystemStatus",
-        "systemtypes" => "SystemTypes",
         "taskretries" => "TaskRetries",
         "urirevmapper" => "UriRevMapper",
         "userroles" => "UserRoles",
diff --git a/src/sql/upgrade-78.sql b/src/sql/upgrade-78.sql
new file mode 100644
index 00000000..ced210d9
--- /dev/null
+++ b/src/sql/upgrade-78.sql
@@ -0,0 +1 @@
+DROP TABLE SystemTypes;