Unit Tests
- Modified testing to accomodate new split between stdout/stderr.
This commit is contained in:
@@ -39,10 +39,10 @@ if (open my $fh, '>', 'bug.rc')
|
||||
}
|
||||
|
||||
# Bug 924: '1.0' --> '1.0000'
|
||||
qx{../src/task rc:bug.rc add release 1.0};
|
||||
qx{../src/task rc:bug.rc add 'release 2.0'};
|
||||
qx{../src/task rc:bug.rc add "release 3.0"};
|
||||
my $output = qx{../src/task rc:bug.rc list};
|
||||
qx{../src/task rc:bug.rc add release 1.0 2>&1};
|
||||
qx{../src/task rc:bug.rc add 'release 2.0' 2>&1};
|
||||
qx{../src/task rc:bug.rc add "release 3.0" 2>&1};
|
||||
my $output = qx{../src/task rc:bug.rc list 2>&1};
|
||||
like ($output, qr/\s1.0\n/ms, 'Plain text floating point preserved');
|
||||
like ($output, qr/\s2.0\n/ms, 'Single quote floating point preserved');
|
||||
like ($output, qr/\s3.0\n/ms, 'Double quote floating point preserved');
|
||||
|
||||
Reference in New Issue
Block a user