[Koha-cvs] CVS: koha/C4 Auth.pm,1.6,1.7

[Steve Tonnesen]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv7423

Modified Files:
        Auth.pm 
Log Message:
Cookie bug.


Index: Auth.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Auth.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** Auth.pm     5 Jul 2002 19:56:35 -0000       1.6
--- Auth.pm     5 Jul 2002 20:33:23 -0000       1.7
***************
*** 77,81 ****
        my $password=$query->param('password');
        if (checkpw($dbh, $userid, $password)) {
-       #if (($userid eq 'librarian' || $userid eq 'tonnesen' || $userid eq 
'patron') && $password eq 'koha') {
            my $sti=$dbh->prepare("insert into sessions (sessionID, userid, 
ip,lasttime) values (?, ?, ?, ?)");
            $sti->execute($sessionID, $userid, $ENV{'REMOTE_ADDR'}, time());
--- 77,80 ----
***************
*** 84,88 ****
            printf L "%20s from %16s logged in  at %30s.\n", $userid, 
$ENV{'REMOTE_ADDR'}, $time;
            close L;
!           return ($userid, $sessionID, $sessionID);
        } else {
            if ($userid) {
--- 83,90 ----
            printf L "%20s from %16s logged in  at %30s.\n", $userid, 
$ENV{'REMOTE_ADDR'}, $time;
            close L;
!           my $cookie=$query->cookie(-name => 'sessionID',
!                                     -value => $sessionID,
!                                     -expires => '+1y');
!           return ($userid, $cookie, $sessionID);
        } else {
            if ($userid) {
***************
*** 123,128 ****
      or Acquisitions modules and you should see an indicator in the upper left 
of
      the screen saying who you are logged in as.  If you want to try it out 
with
!     a longer timout period, log in as tonnesen/koha and the timeout period 
will
!     be 10 minutes.
      </td>
      </tr>
--- 125,133 ----
      or Acquisitions modules and you should see an indicator in the upper left 
of
      the screen saying who you are logged in as.  If you want to try it out 
with
!     a longer timout period, log in as tonnesen/koha and there will be no
!     timeout period.
!     <p>
!     You can also log in using a patron cardnumber.   Try V10000008 and
!     V1000002X with password koha.
      </td>
      </tr>