Unit Tests

- Fixed obsolete test in basic.t
This commit is contained in:
Paul Beckingham
2009-06-26 00:31:30 -04:00
parent 0440189b1d
commit bb78f61d2a

View File

@@ -28,7 +28,7 @@
use strict; use strict;
use warnings; use warnings;
use Test::More tests => 7; use Test::More tests => 6;
# Create the rc file. # Create the rc file.
if (open my $fh, '>', 'basic.rc') if (open my $fh, '>', 'basic.rc')
@@ -40,8 +40,7 @@ if (open my $fh, '>', 'basic.rc')
# Test the usage command. # Test the usage command.
my $output = qx{../task rc:basic.rc}; my $output = qx{../task rc:basic.rc};
like ($output, qr/Usage: task/, 'usage'); like ($output, qr/You must specify a command, or a task ID to modify/, 'missing command and ID');
like ($output, qr/http:\/\/taskwarrior\.org/, 'usage - url');
# Test the version command. # Test the version command.
$output = qx{../task rc:basic.rc version}; $output = qx{../task rc:basic.rc version};