Lines 39-47
unless ($plugins_enabled) {
Link Here
|
39 |
exit 1; |
39 |
exit 1; |
40 |
} |
40 |
} |
41 |
|
41 |
|
42 |
my @plugins = Koha::Plugins->new()->InstallPlugins(); |
|
|
43 |
|
42 |
|
44 |
unless (@plugins) { |
43 |
my @existing_plugins = Koha::Plugins->new()->GetPlugins({ |
|
|
44 |
all => 1, |
45 |
}); |
46 |
my $existing_plugins; |
47 |
for my $existing_plugin (@existing_plugins) { |
48 |
$existing_plugins->{ $existing_plugin->{metadata}->{name} } = |
49 |
$existing_plugin->{metadata}->{version}; |
50 |
} |
51 |
|
52 |
my @installed_plugins = Koha::Plugins->new()->InstallPlugins(); |
53 |
unless (@installed_plugins) { |
45 |
my $plugins_dir = C4::Context->config("pluginsdir"); |
54 |
my $plugins_dir = C4::Context->config("pluginsdir"); |
46 |
if ( ref($plugins_dir) eq 'ARRAY' ) { |
55 |
if ( ref($plugins_dir) eq 'ARRAY' ) { |
47 |
print "No plugins found\n"; |
56 |
print "No plugins found\n"; |
Lines 50-63
unless (@plugins) {
Link Here
|
50 |
else { |
59 |
else { |
51 |
print "No plugins found at $plugins_dir\n"; |
60 |
print "No plugins found at $plugins_dir\n"; |
52 |
} |
61 |
} |
|
|
62 |
exit 0; |
53 |
} |
63 |
} |
54 |
|
64 |
|
55 |
for my $plugin (@plugins) { |
65 |
for my $installed_plugin (@installed_plugins) { |
56 |
print "Installed " |
66 |
if ( !exists( $existing_plugins->{ $installed_plugin->{metadata}->{name} } ) |
57 |
. $plugin->{metadata}->{name} |
67 |
) |
58 |
. " version " |
68 |
{ |
59 |
. $plugin->{metadata}->{version} . "\n"; |
69 |
print "Installed " |
|
|
70 |
. $installed_plugin->{metadata}->{name} |
71 |
. " version " |
72 |
. $installed_plugin->{metadata}->{version} . "\n"; |
73 |
} |
74 |
elsif ( $existing_plugins->{ $installed_plugin->{metadata}->{name} } ne |
75 |
$installed_plugin->{metadata}->{version} ) |
76 |
{ |
77 |
print "Upgraded " |
78 |
. $installed_plugin->{metadata}->{name} |
79 |
. " from version " |
80 |
. $existing_plugins->{ $installed_plugin->{metadata}->{name} } |
81 |
. " to version " |
82 |
. $installed_plugin->{metadata}->{version} . "\n"; |
83 |
} |
60 |
} |
84 |
} |
|
|
85 |
print "All plugins successfully re-initialised\n"; |
61 |
|
86 |
|
62 |
=head1 NAME |
87 |
=head1 NAME |
63 |
|
88 |
|
64 |
- |
|
|