parse ZM_SERVER_HOST into ZM_SERVER
This commit is contained in:
parent
4edf997791
commit
b0b69c5176
|
@ -102,6 +102,18 @@ BEGIN
|
||||||
}
|
}
|
||||||
$sth->finish();
|
$sth->finish();
|
||||||
#$dbh->disconnect();
|
#$dbh->disconnect();
|
||||||
|
|
||||||
|
if ( ! exists $Config{ZM_SERVER_ID} ) {
|
||||||
|
$sth = $dbh->prepare_cached( 'SELECT * FROM Servers WHERE Name=?' );
|
||||||
|
if ( $Config{ZM_SERVER_NAME} ) {
|
||||||
|
$res = $sth->execute( $Config{ZM_SERVER_NAME} );
|
||||||
|
} elsif ( $Config{ZM_SERVER_HOST} ) {
|
||||||
|
$res = $sth->execute( $Config{ZM_SERVER_HOST} );
|
||||||
|
} else {
|
||||||
|
}
|
||||||
|
my $result = $sth->fetchrow_hashref();
|
||||||
|
$Config{ZM_SERVER_ID} = $$result{Id};
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
Loading…
Reference in New Issue