--- loncom/auth/lonlogout.pm 2006/04/05 22:28:58 1.17
+++ loncom/auth/lonlogout.pm 2006/09/05 20:16:49 1.21
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Logout Handler
#
-# $Id: lonlogout.pm,v 1.17 2006/04/05 22:28:58 albertel Exp $
+# $Id: lonlogout.pm,v 1.21 2006/09/05 20:16:49 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -59,23 +59,13 @@ sub handler {
#we've got a valid user
my @profile;
- my %sessionhash;
- {
- my $idf=Apache::File->new("$lonidsdir/$handle.id");
- @profile=<$idf>;
- }
- my $envi;
- for ($envi=0;$envi<=$#profile;$envi++) {
- chomp($profile[$envi]);
- my ($envname,$envvalue)=split(/=/,$profile[$envi]);
- $sessionhash{$envname}=$envvalue;
- }
+ &Apache::lonnet::transfer_profile_to_env($lonidsdir,$handle);
unlink("$lonidsdir/$handle.id");
my %temp=('logout' => time);
&Apache::lonnet::put('email_status',\%temp);
- &Apache::lonnet::log($sessionhash{'user.domain'},
- $sessionhash{'user.name'},
- $sessionhash{'user.home'},
+ &Apache::lonnet::log($env{'user.domain'},
+ $env{'user.name'},
+ $env{'user.home'},
"Logout $ENV{'REMOTE_ADDR'}");
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
@@ -87,7 +77,7 @@ sub handler {
# ---------------------------------------------------------------- Get handover
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['handover']);
my $switch='';
- my $bodytag='';
+ my $start_page='';
my $relogmessage='';
if ($env{'form.handover'}) {
$switch='$lt{'cw'} $lt{'or'}
- $lt{'li'}.
+ $lt{'li'}.
ENDRELOG
+
+ if ($env{'request.sso.login'}
+ && defined($r->dir_config('lonSSOUserLogoutMessageFile'))) {
+ open(my $fh,$r->dir_config('lonSSOUserLogoutMessageFile'));
+ $relogmessage.= join('',<$fh>);
+ }
+
}
- $end_page=&Apache::loncommon::end_page();
+ my $end_page=&Apache::loncommon::end_page();
# --------------------------------------------------------------- Screen Output
$r->print(<