$form->{"cp_${_}"} = $form->{"selected_cp_${_}"}
if ($form->{"selected_cp_${_}"});
} qw(title greeting));
-#
+
+ #
# escape '
map { $form->{$_} =~ s/\'/\'\'/g }
qw(customernumber name street zipcode city country homepage contact notes cp_title cp_greeting language pricegroup);
ustid = '$form->{ustid}',
username = '$form->{username}',
salesman_id = '$form->{salesman_id}',
- user_password = | . $dbh->quote($form->{user_password}) .qq|,
+ user_password = | . $dbh->quote($form->{user_password}) . qq|,
c_vendor_id = '$form->{c_vendor_id}',
klass = '$form->{klass}'
WHERE id = $form->{id}|;