oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Under mod_perl the WebGUI user is automatically added to the access-log for better statistics.

Browse source
This commit is contained in:
JT Smith 2002-08-01 03:48:11 +00:00
parent 80d9099815
commit ce1c4abbb6
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Session.pm
View file

@ -235,6 +235,12 @@ sub open {
###---------------------------- ###----------------------------
### current user's account and profile information (from users and userProfileData tables) ### current user's account and profile information (from users and userProfileData tables)
$session{user} = _getUserInfo($session{var}{userId},$session{dbh}); $session{user} = _getUserInfo($session{var}{userId},$session{dbh});
if ($session{env}{MOD_PERL}) {
my $r = Apache->request;
if(defined($r)) {
$r->connection->user($session{user}{username});
}
}
###---------------------------- ###----------------------------
### current page's properties (from page table) ### current page's properties (from page table)
$session{page} = _getPageInfo("",$session{dbh},$session{setting}{notFoundPage},$session{config}{scripturl}); $session{page} = _getPageInfo("",$session{dbh},$session{setting}{notFoundPage},$session{config}{scripturl});