package Koha::Plugin::BrokenUpgrade;

use Modern::Perl;

use base qw(Koha::Plugins::Base);

our $VERSION = 1.01;
our $metadata = {
    name            => 'Broken upgrade plugin',
    author          => 'Kyle M Hall',
    description     => 'Broken upgrade plugin',
    date_authored   => '2013-01-14',
    date_updated    => '2013-01-14',
    minimum_version => '3.11',
    maximum_version => undef,
    version         => $VERSION,
};

=head1 METHODS

=head2 new

Instantiate the plugin

=cut

sub new {
    my ( $class, $args ) = @_;
    $args->{'metadata'} = $metadata;
    my $self = $class->SUPER::new($args);
    return $self;
}

=head2 upgrade

upgrade method that dies

=cut

sub upgrade {
    die "Why Liz? WHY?";
}

1;
