git.shiar.nl
/
perl
/
file-rewrite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e8a4181
)
t: test partial match
author
Mischa POSLAWSKY
<perl@shiar.org>
Thu, 12 Jan 2012 14:19:00 +0000
(15:19 +0100)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Fri, 20 Apr 2012 16:56:53 +0000
(18:56 +0200)
t/10-fileset.t
patch
|
blob
|
history
diff --git
a/t/10-fileset.t
b/t/10-fileset.t
index bf859de2090f36d81819e09978a677c0d0e7b657..654242a8fa14d8014643e97a1e86013275649d7f 100644
(file)
--- a/
t/10-fileset.t
+++ b/
t/10-fileset.t
@@
-47,7
+47,7
@@
sub testfileset {
my $BASICBODY = "replace$/noremove$/remove$/.$/";
-testfileset('no match', $BASICBODY, ['no
match'
=> undef], 0, $BASICBODY);
+testfileset('no match', $BASICBODY, ['no
'
=> undef], 0, $BASICBODY);
testfileset('remove string', $BASICBODY, ['remove' => undef], 1, "replace$/noremove$/.$/");
testfileset('remove empty', "$/.$/ $/$/", ['' => undef], 2, ".$/ $/");
testfileset('remove regex', $BASICBODY, [qr/^re/ => undef], 2);