Fix syntax errors in the last Auth patch for bug #12269.

This commit is contained in:
Colin Kuskie 2011-10-13 09:09:45 -07:00
parent 916a1eadc8
commit 40c61575d6

View file

@ -590,7 +590,7 @@ sub displayLogin {
$vars->{title} = $i18n->get(66); $vars->{title} = $i18n->get(66);
my $action; my $action;
if ($self->session->setting->get("encryptLogin")) { if ($self->session->setting->get("encryptLogin")) {
my $uri = URI->new($session->url->page(undef,1)); my $uri = URI->new($self->session->url->page(undef,1));
$uri->scheme('https'); $uri->scheme('https');
$uri->host_port($uri->host); $uri->host_port($uri->host);
$action = $uri->as_string; $action = $uri->as_string;
@ -928,7 +928,7 @@ sub login {
my $currentUrl = URI->new($self->session->url->page(undef,1)); my $currentUrl = URI->new($self->session->url->page(undef,1));
$currentUrl->scheme('http'); $currentUrl->scheme('http');
$currentUrl->port($self->session->config->get('webServerPort') || 80); $currentUrl->port($self->session->config->get('webServerPort') || 80);
$self->session->http->setRedirect($currentUrl->canonical->as-string); $self->session->http->setRedirect($currentUrl->canonical->as_string);
} }
# Get open version tag. This is needed if we want # Get open version tag. This is needed if we want