From 93d133a2d88e59e4c32189bb32f5a05428e108b1 Mon Sep 17 00:00:00 2001
From: hylom <hylom@users.sourceforge.jp>
Date: Wed, 3 Apr 2019 19:41:49 +0900
Subject: [PATCH] Util::Test: fix create_user() error handling

---
 src/newslash_web/lib/Newslash/Util/Test.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/newslash_web/lib/Newslash/Util/Test.pm b/src/newslash_web/lib/Newslash/Util/Test.pm
index 3f5c95f5..a998a3ae 100644
--- a/src/newslash_web/lib/Newslash/Util/Test.pm
+++ b/src/newslash_web/lib/Newslash/Util/Test.pm
@@ -83,7 +83,10 @@ sub create_user {
     else {
         $user = $users->select(nickname => $user_name);
     }
-    return if !$user;
+    if (!$user) {
+        warn "Newslash::Util::Test:create_user: create user failed. uid: " . ($uid ? $uid : "(no uid)");
+        return;
+    }
     if ($passwd) {
         my $rs = Newslash::Util::Test::update_user_passwd($app, $user->{uid}, $passwd);
         if (!$rs) {
-- 
2.11.0