Enhancement - Custom report limit override

- If a custom report has a specified limit to the number of tasks
  it shows, then that limit may be  overridden by specifying a new
  quantity on the command line.
- Added unit tests to verify expected behavior.
- Updated documentation to reflect new functionality.
- Removed obsolete documentation references to an "oldest" and
  "newest" configuration variable.
This commit is contained in:
Paul Beckingham 2009-05-09 22:32:40 -04:00
parent 72f84b3c3e
commit 1c736a319d
6 changed files with 79 additions and 29 deletions

View file

@ -28,7 +28,7 @@
use strict;
use warnings;
use Test::More tests => 33;
use Test::More tests => 55;
# Create the rc file.
if (open my $fh, '>', 'oldest.rc')
@ -66,30 +66,56 @@ qx{../task rc:oldest.rc add ten; sleep 1};
qx{../task rc:oldest.rc add eleven};
$output = qx{../task rc:oldest.rc oldest};
like ($output, qr/one/, 'oldest: one');
like ($output, qr/two/, 'oldest: two');
like ($output, qr/three/, 'oldest: three');
like ($output, qr/four/, 'oldest: four');
like ($output, qr/five/, 'oldest: five');
like ($output, qr/six/, 'oldest: six');
like ($output, qr/seven/, 'oldest: seven');
like ($output, qr/eight/, 'oldest: eight');
like ($output, qr/nine/, 'oldest: nine');
like ($output, qr/ten/, 'oldest: ten');
like ($output, qr/one/, 'oldest: one');
like ($output, qr/two/, 'oldest: two');
like ($output, qr/three/, 'oldest: three');
like ($output, qr/four/, 'oldest: four');
like ($output, qr/five/, 'oldest: five');
like ($output, qr/six/, 'oldest: six');
like ($output, qr/seven/, 'oldest: seven');
like ($output, qr/eight/, 'oldest: eight');
like ($output, qr/nine/, 'oldest: nine');
like ($output, qr/ten/, 'oldest: ten');
unlike ($output, qr/eleven/, 'no: eleven');
$output = qx{../task rc:oldest.rc oldest 3};
like ($output, qr/one/, 'oldest: one');
like ($output, qr/two/, 'oldest: two');
like ($output, qr/three/, 'oldest: three');
unlike ($output, qr/four/, 'no: four');
unlike ($output, qr/five/, 'no: five');
unlike ($output, qr/six/, 'no: six');
unlike ($output, qr/seven/, 'no: seven');
unlike ($output, qr/eight/, 'no: eight');
unlike ($output, qr/nine/, 'no: nine');
unlike ($output, qr/ten/, 'no: ten');
unlike ($output, qr/eleven/, 'no: eleven');
$output = qx{../task rc:oldest.rc newest};
unlike ($output, qr/one/, 'no: one');
like ($output, qr/two/, 'newest: two');
like ($output, qr/three/, 'newest: three');
like ($output, qr/four/, 'newest: four');
like ($output, qr/five/, 'newest: five');
like ($output, qr/six/, 'newest: six');
like ($output, qr/seven/, 'newest: seven');
like ($output, qr/eight/, 'newest: eight');
like ($output, qr/nine/, 'newest: nine');
like ($output, qr/ten/, 'newest: ten');
like ($output, qr/eleven/, 'newest: eleven');
unlike ($output, qr/one/, 'no: one');
like ($output, qr/two/, 'newest: two');
like ($output, qr/three/, 'newest: three');
like ($output, qr/four/, 'newest: four');
like ($output, qr/five/, 'newest: five');
like ($output, qr/six/, 'newest: six');
like ($output, qr/seven/, 'newest: seven');
like ($output, qr/eight/, 'newest: eight');
like ($output, qr/nine/, 'newest: nine');
like ($output, qr/ten/, 'newest: ten');
like ($output, qr/eleven/, 'newest: eleven');
$output = qx{../task rc:oldest.rc newest 3};
unlike ($output, qr/one/, 'no: one');
unlike ($output, qr/two/, 'no: two');
unlike ($output, qr/three/, 'no: three');
unlike ($output, qr/four/, 'no: four');
unlike ($output, qr/five/, 'no: five');
unlike ($output, qr/six/, 'no: six');
unlike ($output, qr/seven/, 'no: seven');
unlike ($output, qr/eight/, 'no: eight');
like ($output, qr/nine/, 'newest: nine');
like ($output, qr/ten/, 'newest: ten');
like ($output, qr/eleven/, 'newest: eleven');
# Cleanup.
unlink 'pending.data';