X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/dc3cd296e62eb09a16fa694d9b3a7158e4cf63bf..40d52f50:/bin/mozilla/common.pl diff --git a/bin/mozilla/common.pl b/bin/mozilla/common.pl index 42b667653..1c308dac7 100644 --- a/bin/mozilla/common.pl +++ b/bin/mozilla/common.pl @@ -91,7 +91,7 @@ sub select_part_internal { my ($new_item, $callback_sub); - my $re = "^new_.*_" . $form->{selection}; + my $re = "^new_.*_$form->{selection}\$"; foreach (grep /$re/, keys %{ $form }) { my $new_key = $_;