- Fixed bug #1091, allowing filters to use 'urgency.over:4.5'.
This commit is contained in:
Paul Beckingham 2013-01-12 16:49:48 -05:00
parent 76468f3ddd
commit dd1f154376
7 changed files with 134 additions and 5 deletions

View file

@ -28,7 +28,7 @@
use strict;
use warnings;
use Test::More tests => 22;
use Test::More tests => 26;
# Create the rc file.
if (open my $fh, '>', 'op.rc')
@ -76,6 +76,12 @@ like ($output, qr/two/, 'ls description > t --> two');
like ($output, qr/three/, 'ls description > t --> three');
unlike ($output, qr/four/, 'ls description > t --> !four');
$output = qx{../src/task rc:op.rc 'urgency > 10.0' ls 2>&1};
like ($output, qr/one/, 'ls urgency > 10 --> one');
like ($output, qr/two/, 'ls urgency > 10 --> two');
unlike ($output, qr/three/, 'ls urgency > 10 --> !three');
unlike ($output, qr/four/, 'ls urgency > 10 --> !four');
# Cleanup.
unlink qw(pending.data completed.data undo.data backlog.data synch.key op.rc);
ok (! -r 'pending.data' &&