gergely/taskwarrior-2.x
1
0
Fork 0
Code Issues Actions Packages Projects Releases 1 Wiki Activity

Variant

Browse Source 
- Implemented partial match for strings.
This commit is contained in:
Paul Beckingham
2014-05-27 00:08:07 -04:00
parent 0664cb5689
commit 0b160292c0
2 changed files with 25 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
test/feature.891.t
View File

@@ -61,11 +61,11 @@ EOF
my $output = qx{../src/task rc:bug.rc 1 info 2>&1};
my ($uuid) = $output =~ /UUID\s+(\S{36})/ms;
$output = qx{../src/task rc:bug.rc $uuid list rc.debug:1 2>&1};
$output = qx{../src/task rc:bug.rc $uuid list 2>&1};
like ($output, qr/one/, "Found with $uuid");
my ($short) = $uuid =~ /^(.{35})/;
$output = qx{../src/task rc:bug.rc $short list rc.debug:1 2>&1};
$output = qx{../src/task rc:bug.rc $short list 2>&1};
like ($output, qr/one/, "Found with $short");
($short) = $uuid =~ /^(.{34})/;