Use a DB entry to get the URI

This commit is contained in:
Daniel Berteaud 2013-11-19 09:14:02 +01:00
parent 58f1025cc6
commit 4dd2a44cf9
1 changed files with 4 additions and 11 deletions

View File

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