diff options
author | Ævar Arnfjörð Bjarmason <avar@cpan.org> | 2011-02-20 18:25:04 +0000 |
---|---|---|
committer | Ævar Arnfjörð Bjarmason <avar@cpan.org> | 2011-02-20 18:25:08 +0000 |
commit | 95fff96f80798d61fc96c775f4c769b512c5c5d9 (patch) | |
tree | 754c52f4a397337be1bfef7151f3a96a356207d2 | |
parent | df9ed1280483f588e6a429ae91e726eb3700dc40 (diff) | |
download | perl-95fff96f80798d61fc96c775f4c769b512c5c5d9.tar.gz |
t/re/re.t: remove leftover diag() debugging in 94b03d7d
Remove some leftover diag() calls added by Karl Williamson in
94b03d7d.
-rw-r--r-- | t/re/re.t | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -73,9 +73,6 @@ if ('1234'=~/(?:(?<A>\d)|(?<C>!))(?<B>\d)(?<A>\d)(?<B>\d)/){ $re = qr/a/aa; ($pat, $mods) = regexp_pattern($re); is($mods, "aa", "Verify /aa is understood"); - diag($mods); - $pat = regexp_pattern($re); - diag($pat); } { |