Variant

- The partial match operator now expects length(left) > length(right).

test/subproject.t

@@ -63,7 +63,7 @@ $output = qx{../src/task rc:sp.rc list project:abc 2>&1};
 like ($output, qr/\babc\s/m, 'abc,ab,a,b | a -> abc');
 
 $output = qx{../src/task rc:sp.rc list project:abcd 2>&1 >/dev/null};
-like ($output, qr/No matches./, 'abc,ab,a,b | abcd -> nul');
+like ($output, qr/No matches\./, 'abc,ab,a,b | abcd -> nul');
 
 # Cleanup.
 unlink qw(pending.data completed.data undo.data backlog.data sp.rc);