diff --git a/build/lemonldap-ng/debian/changelog b/build/lemonldap-ng/debian/changelog index db71c5554..d8509e21c 100644 --- a/build/lemonldap-ng/debian/changelog +++ b/build/lemonldap-ng/debian/changelog @@ -2,8 +2,9 @@ lemonldap-ng (0.8.2.2) unstable; urgency=low * Debian packages modifications due to Lintian control. * New Debian package: lemonldap-ng-doc + * Little bug correction in Portal/CDA.pm - -- Xavier Guimard Tue, 15 May 2007 22:38:59 +0200 + -- Xavier Guimard Tue, 22 May 2007 10:18:43 +0200 lemonldap-ng (0.8.2.1) unstable; urgency=low diff --git a/build/lemonldap-ng/debian/lemonldap-ng-doc.docs b/build/lemonldap-ng/debian/lemonldap-ng-doc.docs new file mode 100644 index 000000000..25811e0df --- /dev/null +++ b/build/lemonldap-ng/debian/lemonldap-ng-doc.docs @@ -0,0 +1,3 @@ +debian/README.Debian +doc/* +README diff --git a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/CDA.pm b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/CDA.pm index 991fc4793..717a71b16 100644 --- a/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/CDA.pm +++ b/modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/CDA.pm @@ -28,7 +28,7 @@ sub autoRedirect { my $self = shift; my $tmp = $self->{domain}; $self->{urldc} .= "?" . $self->{cookieName} . "=" . $self->{id} - if ( $self->{urldc} !~ /$tmp$/oi ); + if ( $self->{urldc} and $self->{urldc} !~ /$tmp$/oi ); return $self->SUPER::autoRedirect(@_); }