update tests to match new code

Author: mjmusante

IFComp/lib/IFComp/Controller/Entry.pm

@@ -101,7 +101,9 @@ sub create : Chained('root') : PathPart('create') : Args(0) {
         $c->res->redirect( $c->uri_for_action('/entry/list') );
     }
 
-    if ( $c->user->paypal eq '' && $c->user->venmo eq '' ) {
+    if (   ( !defined( $c->user->paypal ) || $c->user->paypal eq '' )
+        && ( !defined( $c->user->venmo ) || $c->user->venmo eq '' ) )
+    {
         $c->res->redirect( $c->uri_for_action('/entry/list') );
     }
 

IFComp/t/lib/IFCompTestData.pm

@@ -31,7 +31,7 @@ sub add_test_data_to_schema {
                 'password_md5', 'salt_md5',
                 'email',        'email_is_public',
                 'url',          'verified',
-                'forum_handle',
+                'forum_handle', 'venmo',
             ],
             [   1,                     'user1',
                 $HASHED_PASSWORD,      $SALT,
@@ -40,23 +40,23 @@ sub add_test_data_to_schema {
                 'user1_forum',
             ],
             [   2, 'Alice Author', $HASHED_PASSWORD,
-                $SALT, 'author@example.com', 1, undef, 1, undef,
+                $SALT, 'author@example.com', 1, undef, 1, undef, 'aliceworks',
             ],
             [   3, 'Victor Votecounter',
                 $HASHED_PASSWORD,
-                $SALT, 'votecounter@example.com', 1, undef, 1, undef,
+                $SALT, 'votecounter@example.com', 1, undef, 1, undef, undef,
             ],
             [   4, 'Connie Curator',
                 $HASHED_PASSWORD,
-                $SALT, 'curator@example.com', 1, undef, 1, undef,
+                $SALT, 'curator@example.com', 1, undef, 1, undef, undef,
             ],
             [   5, 'Cheddar Cheez',
                 $HASHED_PASSWORD,
-                $SALT, 'cheez@example.com', 1, undef, 1, undef,
+                $SALT, 'cheez@example.com', 1, undef, 1, undef, undef,
             ],
             [   6, 'Patricia Prizemanager',
                 $HASHED_PASSWORD,
-                $SALT, 'prizes@example.com', 1, undef, 1, undef,
+                $SALT, 'prizes@example.com', 1, undef, 1, undef, undef,
             ],
         ],
     );