[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>