Ignore:
Timestamp:
Feb 21, 2006, 11:28:00 PM (16 years ago)
Author:
Dominic Hargreaves
Message:

Fix mod_perl redirect bug (closes #86)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lib/OpenGuides.pm

    r730 r735  
    424424    my $long = $data{metadata}{longitude}[0];
    425425    my $script_url = $self->config->script_url;
    426     print CGI->redirect( $script_url . "search.cgi?lat=$lat;long=$long;distance_in_metres=$metres" );
     426    my $q = CGI->new;
     427    print $q->redirect( $script_url . "search.cgi?lat=$lat;long=$long;distance_in_metres=$metres" );
    427428}
    428429
     
    937938    $redir_param .= $id;
    938939    $redir_param .= ";oldid=$oldid" if $oldid;
    939 
    940     return CGI->redirect( $redir_param );
     940   
     941    my $q = CGI->new;
     942    return $q->redirect( $redir_param );
    941943}
    942944
Note: See TracChangeset for help on using the changeset viewer.