GothenburgBitFactory/taskwarrior
1
0
Fork 0
mirror of https://github.com/GothenburgBitFactory/taskwarrior.git synced 2025-06-26 10:54:26 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Unit tests

Browse source 
- Fixed export.yaml.t because 'tail +2 file' does not work on tasktools.org.
This commit is contained in:
Paul Beckingham 2010-08-03 23:07:18 -04:00
parent 448f865cf1
commit 92ede80e4b
1 changed files with 20 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

38
src/tests/export.yaml.t
View file

@ -28,7 +28,7 @@
use strict; use strict;
use warnings; use warnings;
use Test::More tests => 21; use Test::More tests => 22;
# Create the rc file. # Create the rc file.
if (open my $fh, '>', 'export.rc') if (open my $fh, '>', 'export.rc')
@ -41,7 +41,7 @@ if (open my $fh, '>', 'export.rc')
# Add two tasks, export, examine result. # Add two tasks, export, examine result.
qx{../task rc:export.rc add priority:H project:A one}; qx{../task rc:export.rc add priority:H project:A one};
qx{../task rc:export.rc add +tag1 +tag2 two}; qx{../task rc:export.rc add +tag1 +tag2 two};
qx{../task rc:export.rc export.yaml | tail +2 > ./export.txt}; qx{../task rc:export.rc export.yaml > ./export.txt};
my @lines; my @lines;
if (open my $fh, '<', './export.txt') if (open my $fh, '<', './export.txt')
@ -49,22 +49,24 @@ if (open my $fh, '<', './export.txt')
@lines = <$fh>; @lines = <$fh>;
close $fh; close $fh;
} }
like ($lines[0], qr/^%YAML 1.1$/, 'export.yaml line 0');
like ($lines[1], qr/^---$/, 'export.yaml line 1'); like ($lines[0], qr/^Using alternate .+$/, 'export.yaml line 0');
like ($lines[2], qr/^ task:$/, 'export.yaml line 2'); like ($lines[1], qr/^\%YAML 1\.1$/, 'export.yaml line 1');
like ($lines[3], qr/^ description: one$/, 'export.yaml line 3'); like ($lines[2], qr/^---$/, 'export.yaml line 2');
like ($lines[4], qr/^ entry: \d+$/, 'export.yaml line 4'); like ($lines[3], qr/^ task:$/, 'export.yaml line 3');
like ($lines[5], qr/^ priority: H$/, 'export.yaml line 5'); like ($lines[4], qr/^ description: one$/, 'export.yaml line 4');
like ($lines[6], qr/^ project: A$/, 'export.yaml line 6'); like ($lines[5], qr/^ entry: \d+$/, 'export.yaml line 5');
like ($lines[7], qr/^ status: pending$/, 'export.yaml line 7'); like ($lines[6], qr/^ priority: H$/, 'export.yaml line 6');
like ($lines[8], qr/^ uuid: .+$/, 'export.yaml line 8'); like ($lines[7], qr/^ project: A$/, 'export.yaml line 7');
like ($lines[9], qr/^ task:$/, 'export.yaml line 9'); like ($lines[8], qr/^ status: pending$/, 'export.yaml line 8');
like ($lines[10], qr/^ description: two$/, 'export.yaml line 10'); like ($lines[9], qr/^ uuid: .+$/, 'export.yaml line 9');
like ($lines[11], qr/^ entry: \d+$/, 'export.yaml line 11'); like ($lines[10], qr/^ task:$/, 'export.yaml line 10');
like ($lines[12], qr/^ status: pending$/, 'export.yaml line 12'); like ($lines[11], qr/^ description: two$/, 'export.yaml line 11');
like ($lines[13], qr/^ tags: tag1,tag2$/, 'export.yaml line 13'); like ($lines[12], qr/^ entry: \d+$/, 'export.yaml line 12');
like ($lines[14], qr/^ uuid: .+$/, 'export.yaml line 14'); like ($lines[13], qr/^ status: pending$/, 'export.yaml line 13');
like ($lines[15], qr/^\.\.\.$/, 'export.yaml line 15'); like ($lines[14], qr/^ tags: tag1,tag2$/, 'export.yaml line 14');
like ($lines[15], qr/^ uuid: .+$/, 'export.yaml line 15');
like ($lines[16], qr/^\.\.\.$/, 'export.yaml line 16');
# Cleanup. # Cleanup.
unlink 'export.txt'; unlink 'export.txt';