htdocs/docs/CGI-modules-2.76-patch.txt


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

ivan@rootwood:~/src/CGI-modules-2.76/CGI$ diff -c Base.pm Base.pm.orig 
*** Base.pm     Sat Jul 18 00:33:21 1998
--- Base.pm.orig        Sat Jul 18 00:06:12 1998
***************
*** 938,945 ****
      my $orig_uri = $self->get_uri;
      $self->log("Redirecting $CGI::Base::REQUEST_METHOD $orig_uri to $to_uri")
        if $Debug;
!     my $msg =   ($perm) ? StatusHdr(301,"Moved Permanently")
!                       : StatusHdr(302,"Moved Temporarily");
      my $hdrs = SendHeaders($msg, LocationHdr($to_uri));
      $self->log($hdrs);
  }
--- 938,945 ----
      my $orig_uri = $self->get_uri;
      $self->log("Redirecting $CGI::Base::REQUEST_METHOD $orig_uri to $to_uri")
        if $Debug;
!     my $msg =   ($perm) ? ServerHdr(301,"Moved Permanently")
!                       : ServerHdr(302,"Moved Temporarily");
      my $hdrs = SendHeaders($msg, LocationHdr($to_uri));
      $self->log($hdrs);
  }