[Koha-cvs] CVS: koha logout.pl,1.1,1.2 shelves.pl,1.6,1.7
Steve Tonnesen
tonnesen at users.sourceforge.net
Fri Jul 5 07:03:39 CEST 2002
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv32237a
Modified Files:
logout.pl shelves.pl
Log Message:
Minor changes to authentication routines.
Index: logout.pl
===================================================================
RCS file: /cvsroot/koha/koha/logout.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** logout.pl 4 Jul 2002 21:09:43 -0000 1.1
--- logout.pl 5 Jul 2002 05:03:36 -0000 1.2
***************
*** 42,46 ****
$sth->execute($sessionID);
open L, ">>/tmp/sessionlog";
! print L "$userid from $ip logged out at ".localtime(time())." (manual log out).\n";
close L;
--- 42,47 ----
$sth->execute($sessionID);
open L, ">>/tmp/sessionlog";
! my $time=localtime(time());
! printf L "%20s from %16s logged out at %30s (manual log out).\n", $userid, $ip, $time;
close L;
***************
*** 49,53 ****
-expires => '+1y');
! print $query->redirect("shelves.pl");
exit;
--- 50,56 ----
-expires => '+1y');
! # Should redirect to intranet home page after logging out
!
! print $query->redirect("mainpage.pl");
exit;
Index: shelves.pl
===================================================================
RCS file: /cvsroot/koha/koha/shelves.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** shelves.pl 4 Jul 2002 21:09:43 -0000 1.6
--- shelves.pl 5 Jul 2002 05:03:37 -0000 1.7
***************
*** 27,31 ****
! print "Logged in as: $loggedinuser<br><a href=logout.pl>Log Out</a><br>\n";
--- 27,31 ----
! print "<p align=left>Logged in as: $loggedinuser [<a href=/cgi-bin/koha/logout.pl>Log Out</a>]</p>\n";
***************
*** 170,176 ****
#
# $Log$
! # Revision 1.6 2002/07/04 21:09:43 tonnesen
! # Additions to authentication scheme. Logs to /tmp/sessionlog. Will move this
! # to a db table.
#
# Revision 1.5 2002/07/04 19:42:48 tonnesen
--- 170,175 ----
#
# $Log$
! # Revision 1.7 2002/07/05 05:03:37 tonnesen
! # Minor changes to authentication routines.
#
# Revision 1.5 2002/07/04 19:42:48 tonnesen
More information about the Koha-cvs
mailing list