From fd658397f3556210f9e8c4de015bf3993522cb22 Mon Sep 17 00:00:00 2001 From: Michal Vaner Date: Mon, 6 Oct 2008 18:31:28 +0200 Subject: [PATCH] Fix problem with empty login --- PciIds/Html/Users.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/PciIds/Html/Users.pm b/PciIds/Html/Users.pm index 99df698..c19bb5d 100644 --- a/PciIds/Html/Users.pm +++ b/PciIds/Html/Users.pm @@ -453,6 +453,8 @@ sub profileFormSubmit( $$$$ ) { my $data = shift; my $change = 0; $change = 1 if $data->{'email'} ne $oldData->{'email'}; + $data->{'login'} = undef if defined $data->{'login'} && $data->{'login'} eq ''; + $oldData->{'login'} = undef if defined $oldData->{'login'} && $oldData->{'login'} eq ''; $change = 1 if ( ( ( defined $data->{'login'} ) != ( defined $oldData->{'login'} ) ) || ( ( defined $data->{'login'} ) && ( defined $oldData->{'login'} ) && ( $data->{'login'} ne $oldData->{'login'} ) ) ); $change = 1 if ( defined $data->{'password'} ) && ( $data->{'password'} ne '' ); return undef unless $change; -- 2.39.2