From 8085e7b197b102ca265a1598ef808c35f894ba6d Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Tue, 10 Oct 2017 10:01:48 +0200 Subject: [PATCH] SL::DBUpgrade2: unbenutzte Funktion `update2_available` entfernen --- SL/DBUpgrade2.pm | 16 ---------------- 1 file changed, 16 deletions(-) diff --git a/SL/DBUpgrade2.pm b/SL/DBUpgrade2.pm index fea216800..b47e84ebb 100644 --- a/SL/DBUpgrade2.pm +++ b/SL/DBUpgrade2.pm @@ -320,14 +320,6 @@ sub unapplied_upgrade_scripts { return grep { !$_->{applied} } @all_scripts; } -sub update2_available { - my ($self, $dbh) = @_; - - my @unapplied_scripts = $self->unapplied_upgrade_scripts($dbh); - - return !!@unapplied_scripts; -} - sub apply_admin_dbupgrade_scripts { my ($self, $called_from_admin) = @_; @@ -657,14 +649,6 @@ to the database that is checked. Requires that the scripts have been parsed. -=item C - -Returns trueish if at least one upgrade script hasn't been applied to -a database yet. C<$dbh> is an open handle to the database that is -checked. - -Requires that the scripts have been parsed. - =back =head1 BUGS -- 2.20.1