Commit 69737ab2 authored by Xavier Guimard's avatar Xavier Guimard

Fix bug introduced in commit 1c382ff2 (#1514)

parent 6ae0035f
......@@ -530,7 +530,7 @@ sub _buildUrl {
|| $class->tsv->{port}->{_}
|| $req->{env}->{SERVER_PORT};
$portString = (
( $vhost =~ /:\d+/ )
( $realvhost =~ /:\d+/ )
or ( $_https && $portString == 443 )
or ( !$_https && $portString == 80 )
) ? '' : ":$portString";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment