Find the URI from a DB entry

tags/smeserver-dl-0.2.1-1
Daniel Berteaud 11 years ago
parent a4977de824
commit 7b73242850
  1. 14
      root/etc/e-smith/templates/etc/dl.php/10Url

@ -1,14 +1,6 @@
{ {
use esmith::DomainsDB; my $uri = $dl{'Uri'} || "https://$SystemName.$DomainName/dl";
my $d = esmith::DomainsDB->open_ro || die "Couldn't open DomainsDB"; $uri .= '/' if ($uri !~ !/$!);
my $vhost = "$SystemName.$DomainName/dl";
foreach ($d->get_all_by_prop(type => 'domain'), $d->get_all_by_prop(type => 'vhost')){
my $root = $_->prop('DocumentRoot') || '';
if ($root eq '/usr/share/dl'){
$vhost = $_->key;
last;
}
}
$OUT .= "\$masterPath = '$vhost'"; $OUT .= "\$masterPath = '$uri';";
} }

Loading…
Cancel
Save