Don't link back to virtualmin for root

This commit is contained in:
Jamie Cameron
2015-01-26 20:27:48 -08:00
parent 99e1eda954
commit 2f34f1412d

View File

@@ -102,14 +102,17 @@ if (&foreign_check("virtual-server") &&
&foreign_available("virtual-server")) {
$virtual_server::no_virtualmin_plugins = 1;
&foreign_require("virtual-server", "virtual-server-lib.pl");
my $type = $module_name =~ /^mysql/ ? 'mysql' : 'postgres';
foreach my $d (grep { &virtual_server::can_edit_domain($_) }
&virtual_server::list_domains()) {
my @dbs = &virtual_server::domain_databases($d, [ $type ]);
my ($got) = grep { $_->{'name'} eq $dbname } @dbs;
if ($got) {
return "../virtual-server/list_databases.cgi?".
"dom=$d->{'id'}";
if (!&virtual_server::master_admin()) {
my $type = $module_name =~ /^mysql/ ? 'mysql' : 'postgres';
foreach my $d (grep { &virtual_server::can_edit_domain($_) }
&virtual_server::list_domains()) {
my @dbs = &virtual_server::domain_databases(
$d, [ $type ]);
my ($got) = grep { $_->{'name'} eq $dbname } @dbs;
if ($got) {
return "../virtual-server/list_databases.cgi?".
"dom=$d->{'id'}";
}
}
}
}