X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Farap.pl;h=67b1c4871ff43c993c36401f777679058418d69c;hb=01b4e844b8991b2f660e89adceed03ca0db9491a;hp=2544986805534a72d5709526c73b36ce3ff737ce;hpb=1a6ef4e8cb00fe664cb7510805586e72f1afd316;p=kivitendo-erp.git diff --git a/bin/mozilla/arap.pl b/bin/mozilla/arap.pl index 254498680..67b1c4871 100644 --- a/bin/mozilla/arap.pl +++ b/bin/mozilla/arap.pl @@ -61,7 +61,7 @@ sub check_name { $name = $name eq "customer" ? "customer" : "vendor"; - my ($new_name, $new_id) = split /--/, $form->{$name}; + my ($new_name,$new_id) = $form->{$name} =~ /^(.*?)--(\d+)$/; my $i = 0; # if we use a selection if ($form->{"select$name"}) { @@ -169,13 +169,11 @@ sub select_name { my $title = $locale->text('Select from one of the names below'); print qq| +

$title

+
{script}> - - - -
$title