*[LEMONLDAP-491] Don't import all POSIX functions

This commit is contained in:
Sandro Cazzaniga 2012-07-12 07:09:41 +00:00
parent accc413b23
commit 66d228d1da

View File

@ -15,7 +15,7 @@ use MIME::Base64;
use Authen::Captcha; use Authen::Captcha;
use Lemonldap::NG::Common::CGI; use Lemonldap::NG::Common::CGI;
use CGI::Cookie; use CGI::Cookie;
require POSIX; use POSIX qw(strftime);
use Lemonldap::NG::Portal::_i18n; #inherits use Lemonldap::NG::Portal::_i18n; #inherits
use Lemonldap::NG::Common::Apache::Session use Lemonldap::NG::Common::Apache::Session
; #link protected session Apache::Session object ; #link protected session Apache::Session object
@ -1111,7 +1111,7 @@ sub updateSession {
} }
# Store updateTime # Store updateTime
$h->{updateTime} = &POSIX::strftime( "%Y%m%d%H%M%S", localtime() ); $h->{updateTime} = strftime( "%Y%m%d%H%M%S", localtime() );
untie %$h; untie %$h;
} }
@ -1969,12 +1969,12 @@ sub setSessionInfo {
# Date and time # Date and time
if ( $self->{updateSession} ) { if ( $self->{updateSession} ) {
$self->{sessionInfo}->{updateTime} = $self->{sessionInfo}->{updateTime} =
&POSIX::strftime( "%Y%m%d%H%M%S", localtime() ); strftime( "%Y%m%d%H%M%S", localtime() );
} }
else { else {
$self->{sessionInfo}->{_utime} ||= time(); $self->{sessionInfo}->{_utime} ||= time();
$self->{sessionInfo}->{startTime} = $self->{sessionInfo}->{startTime} =
&POSIX::strftime( "%Y%m%d%H%M%S", localtime() ); strftime( "%Y%m%d%H%M%S", localtime() );
} }
# Get environment variables matching exportedVars # Get environment variables matching exportedVars