зеркало из https://github.com/mozilla/gecko-dev.git
Whoops; a bad username was causing perl warning messages.
This commit is contained in:
Родитель
78b646104b
Коммит
3d430b3faf
|
@ -348,7 +348,7 @@ sub DBname_to_id {
|
|||
my ($name) = (@_);
|
||||
SendSQL("select userid from profiles where login_name = @{[SqlQuote($name)]}");
|
||||
my $r = FetchOneColumn();
|
||||
if ($r eq "") {
|
||||
if (!defined $r || $r eq "") {
|
||||
return 0;
|
||||
}
|
||||
return $r;
|
||||
|
|
Загрузка…
Ссылка в новой задаче