diff --git a/modules/lemonldap-ng-manager/Changes b/modules/lemonldap-ng-manager/Changes index 14f31f5f5..9d95b5312 100644 --- a/modules/lemonldap-ng-manager/Changes +++ b/modules/lemonldap-ng-manager/Changes @@ -3,6 +3,9 @@ Revision history for Perl extension Lemonldap::NG::Manager. 0.8 Sat jun 23 21:54:27 2007 - New feature: syntax errors are now displayed in the manager interface +0.72 Tue jun 20 22:00:15 2007 + - Javascript rewrite + 0.71 Mon jun 19 22:22:33 2007 - Bug in javascript : a 'z' is added in regexp diff --git a/modules/lemonldap-ng-portal/Changes b/modules/lemonldap-ng-portal/Changes index 70984e95b..850ef56ed 100644 --- a/modules/lemonldap-ng-portal/Changes +++ b/modules/lemonldap-ng-portal/Changes @@ -1,5 +1,8 @@ Revision history for Perl extension Lemonldap::NG::Portal. +0.741 Tue Jul 3 7:21:16 2007 + - Little bug in redirect sub + 0.74 Mon May 14 7:04:48 2007 - Multiple ldap servers can be used - CDA optimization diff --git a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm index c8293ec06..e41129a23 100644 --- a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm +++ b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm @@ -13,7 +13,7 @@ use CGI::Cookie; require POSIX; use Lemonldap::NG::Portal::_i18n; -our $VERSION = '0.74'; +our $VERSION = '0.741'; our @ISA = qw(CGI Exporter); @@ -131,8 +131,8 @@ sub header { # CGI.pm overload to add Lemonldap::NG cookie sub redirect { my $self = shift; - if ( $_[0]->{cookie} ) { - $self->SUPER::redirect( @_, -cookie => $_[0]->{cookie} ); + if ( $self->{cookie} ) { + $self->SUPER::redirect( @_, -cookie => $self->{cookie} ); } else { $self->SUPER::redirect(@_);