OSDN Git Service

Model::Users: fix to work on_start_up()
authorhylom <hylom@users.sourceforge.jp>
Fri, 24 Feb 2017 13:24:07 +0000 (22:24 +0900)
committerhylom <hylom@users.sourceforge.jp>
Fri, 24 Feb 2017 13:24:18 +0000 (22:24 +0900)
src/newslash_web/lib/Newslash/Model/Users.pm

index c420bf5..c4e00ef 100644 (file)
@@ -41,9 +41,11 @@ EOSQL
         my $rs = $dbh->do($sql, undef);
         $self->disconnect_db;
         if ($rs) {
-            return 1;
+            $self->warn("create table: $table_name");
+        }
+        else {
+            $self->warn("cannot create table: $table_name");
         }
-        $self->warn("cannot create table: $table_name");
     }
 
     $table_name = CONFIG_TABLE_NAME;
@@ -59,9 +61,11 @@ EOSQL
         my $rs = $dbh->do($sql, undef);
         $self->disconnect_db;
         if ($rs) {
-            return 1;
+            $self->warn("create table: $table_name");
+        }
+        else {
+            $self->warn("cannot create table: $table_name");
         }
-        $self->warn("cannot create table: $table_name");
     }
 
     # check anonymous user exists
@@ -73,6 +77,7 @@ EOSQL
         $self->update_info(uid => 1,
                            realname => "名無しのゴンベエ",
                            karma => -25);
+        $self->warn("create anonymous_user");
     }
 
     # convert AC (uid==1) user's data