Unit Tests

- Fixed a series of bugs to improve the test suite results.

src/tests/args.t

@@ -33,7 +33,8 @@ use Test::More tests => 8;
 # Create the rc file.
 if (open my $fh, '>', 'args.rc')
 {
-  print $fh "data.location=.\n";
+  print $fh "data.location=.\n",
+            "confirmation=no\n";
   close $fh;
   ok (-r 'args.rc', 'Created args.rc');
 }

src/tests/bug.concat.t

@@ -33,7 +33,8 @@ use Test::More tests => 6;
 # Create the rc file.
 if (open my $fh, '>', 'bug_concat.rc')
 {
-  print $fh "data.location=.\n";
+  print $fh "data.location=.\n",
+            "confirmation=no\n";
   close $fh;
   ok (-r 'bug_concat.rc', 'Created bug_concat.rc');
 }

src/tests/import.csv.t

@@ -54,7 +54,13 @@ like ($output, qr/Imported 2 tasks successfully, with 0 errors./, 'no errors');
 
 $output = qx{../task rc:import.rc list};
 like ($output, qr/1.+H.+this is a test/, 't1');
+diag ("---");
+diag ($output);
+diag ("---");
 like ($output, qr/2.+another task/,      't2');
+diag ("---");
+diag ($output);
+diag ("---");
 
 # Cleanup.
 unlink 'import.txt';