E9 operator_equal
- Fixed broken logic in operator_equal. - Fixed typos in op_and.t unit test. - Fixed descriptions in op_or.t.
This commit is contained in:
@@ -76,7 +76,7 @@ unlike ($output, qr/two/, 'ls project:A priority:H --> !two');
|
||||
unlike ($output, qr/three/, 'ls project:A priority:H --> !three');
|
||||
unlike ($output, qr/four/, 'ls project:A priority:H --> !four');
|
||||
|
||||
$output = qx{../src/task rc:op.rc ls project=A and priotity!=H};
|
||||
$output = qx{../src/task rc:op.rc ls project=A and priority!=H};
|
||||
unlike ($output, qr/one/, 'ls project:A priority:H --> !one');
|
||||
like ($output, qr/two/, 'ls project:A priority:H --> two');
|
||||
unlike ($output, qr/three/, 'ls project:A priority:H --> !three');
|
||||
|
||||
32
test/op_or.t
32
test/op_or.t
@@ -47,28 +47,28 @@ qx{../src/task rc:op.rc add four };
|
||||
|
||||
# Test the 'or' operator.
|
||||
my $output = qx{../src/task rc:op.rc ls project:A or priority:H};
|
||||
like ($output, qr/one/, 'ls project:A priority:H --> one');
|
||||
like ($output, qr/two/, 'ls project:A priority:H --> two');
|
||||
like ($output, qr/three/, 'ls project:A priority:H --> three');
|
||||
unlike ($output, qr/four/, 'ls project:A priority:H --> !four');
|
||||
like ($output, qr/one/, 'ls project:A or priority:H --> one');
|
||||
like ($output, qr/two/, 'ls project:A or priority:H --> two');
|
||||
like ($output, qr/three/, 'ls project:A or priority:H --> three');
|
||||
unlike ($output, qr/four/, 'ls project:A or priority:H --> !four');
|
||||
|
||||
$output = qx{../src/task rc:op.rc ls project:A or priority=H};
|
||||
like ($output, qr/one/, 'ls project:A priority=H --> one');
|
||||
like ($output, qr/two/, 'ls project:A priority=H --> two');
|
||||
like ($output, qr/three/, 'ls project:A priority=H --> three');
|
||||
unlike ($output, qr/four/, 'ls project:A priority=H --> !four');
|
||||
like ($output, qr/one/, 'ls project:A or priority=H --> one');
|
||||
like ($output, qr/two/, 'ls project:A or priority=H --> two');
|
||||
like ($output, qr/three/, 'ls project:A or priority=H --> three');
|
||||
unlike ($output, qr/four/, 'ls project:A or priority=H --> !four');
|
||||
|
||||
$output = qx{../src/task rc:op.rc ls project=A or priority:H};
|
||||
like ($output, qr/one/, 'ls project=A priority:H --> one');
|
||||
like ($output, qr/two/, 'ls project=A priority:H --> two');
|
||||
like ($output, qr/three/, 'ls project=A priority:H --> three');
|
||||
unlike ($output, qr/four/, 'ls project=A priority:H --> !four');
|
||||
like ($output, qr/one/, 'ls project=A or priority:H --> one');
|
||||
like ($output, qr/two/, 'ls project=A or priority:H --> two');
|
||||
like ($output, qr/three/, 'ls project=A or priority:H --> three');
|
||||
unlike ($output, qr/four/, 'ls project=A or priority:H --> !four');
|
||||
|
||||
$output = qx{../src/task rc:op.rc ls project=A or priority=H};
|
||||
like ($output, qr/one/, 'ls project=A priority=H --> one');
|
||||
like ($output, qr/two/, 'ls project=A priority=H --> two');
|
||||
like ($output, qr/three/, 'ls project=A priority=H --> three');
|
||||
unlike ($output, qr/four/, 'ls project=A priority=H --> !four');
|
||||
like ($output, qr/one/, 'ls project=A or priority=H --> one');
|
||||
like ($output, qr/two/, 'ls project=A or priority=H --> two');
|
||||
like ($output, qr/three/, 'ls project=A or priority=H --> three');
|
||||
unlike ($output, qr/four/, 'ls project=A or priority=H --> !four');
|
||||
|
||||
# Cleanup.
|
||||
unlink 'pending.data';
|
||||
|
||||
Reference in New Issue
Block a user