Revision 7199
Added by ben leinfelder over 12 years ago
| src/perl/ldapweb.cgi | ||
|---|---|---|
| 62 | 62 |
|
| 63 | 63 |
# url configuration |
| 64 | 64 |
my $server = $properties->splitToTree(qr/\./, 'server'); |
| 65 |
my $contextUrl = 'http://' . $properties->getProperty('server.name');
|
|
| 65 |
my $protocol = 'http://'; |
|
| 66 |
if ( $properties->getProperty('server.httpPort') eq '443' ) {
|
|
| 67 |
$protocol = 'https://'; |
|
| 68 |
} |
|
| 69 |
my $contextUrl = $protocol . $properties->getProperty('server.name');
|
|
| 66 | 70 |
if ($properties->getProperty('server.httpPort') ne '80') {
|
| 67 | 71 |
$contextUrl = $contextUrl . ':' . $properties->getProperty('server.httpPort');
|
| 68 | 72 |
} |
Also available in: Unified diff
handle https-only server configuration -- must pull resources from https not http for the skins etc.