summaryrefslogtreecommitdiff
path: root/t/op/grent.t
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-11-29 10:54:38 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-11-29 10:54:38 +0000
commitbfc605f9e1d41dd7493c0c0fcfd1304c238dbe4d (patch)
treeea4a813f2f52f906f764efc1c28e09fd64b48248 /t/op/grent.t
parent57668c4d7bc86e7fbc7116d331d73409d0afeaa8 (diff)
downloadperl-bfc605f9e1d41dd7493c0c0fcfd1304c238dbe4d.tar.gz
s/warn/print/ on multiply defined groups
p4raw-id: //depot/perl@2384
Diffstat (limited to 't/op/grent.t')
-rwxr-xr-xt/op/grent.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/grent.t b/t/op/grent.t
index e0cd7a82c5..cfd0fadf01 100755
--- a/t/op/grent.t
+++ b/t/op/grent.t
@@ -80,7 +80,7 @@ foreach (sort keys %seen) {
if ($times > 1) {
# Multiply defined groups are rarely intentional.
local $" = ", ";
- warn "# Group '$_' defined multiple times in $where, lines: @{$seen{$_}}.\n";
+ print "# Group '$_' defined multiple times in $where, lines: @{$seen{$_}}.\n";
delete $suspect{$_};
}
}