Warning in tests unterdrücken.

diff --git a/t/controllers/helpers/parse_filter.t b/t/controllers/helpers/parse_filter.t
index 179c236..1988773 100644 (file)
--- a/t/controllers/helpers/parse_filter.t
+++ b/t/controllers/helpers/parse_filter.t
@@ -16,7 +16,7 @@ sub test ($$$;%) {
   my ($filter, $expect, $msg, %params) = @_;
   my $target = delete $params{target};
   my $args = { parse_filter($filter, %params) };
-  my $got  = $args;
+  my $got  = $args; $target ||= '';
      $got = $filter             if $target =~ /filter/;
      $got = $params{launder_to} if $target =~ /launder/;
   cmp_deeply(