#sub correct_urlbase {
#    my $ssl = Bugzilla->params->{'ssl'};
#    return Bugzilla->params->{'urlbase'} if $ssl eq 'never';
#
#    my $sslbase = Bugzilla->params->{'sslbase'};
#    if ($sslbase) {
#        return $sslbase if $ssl eq 'always';
#        # Authenticated Sessions
#        return $sslbase if Bugzilla->user->id;
#    }
#
#    # Set to "authenticated sessions" but nobody's logged in, or
#    # sslbase isn't set.
#    return Bugzilla->params->{'urlbase'};
#}



sub correct_urlbase {
    my $ssl = Bugzilla->params->{'ssl_redirect'};
    my $urlbase = Bugzilla->params->{'urlbase'};
    my $sslbase = Bugzilla->params->{'sslbase'};

    if (!$sslbase) {
        return $urlbase;
    }
    elsif ($ssl) {
        return $sslbase;
    }
    else {
        # Return what the user currently uses.
        return (uc($ENV{HTTPS} || '') eq 'ON') ? $sslbase : $urlbase;
    }
}