#quote selectvendor Bug 133
$form->{"selectvendor"} = $form->quote($form->{"selectvendor"});
+ #substitute \n and \r to \s (bug 543)
+ $form->{"selectvendor"} =~ s/[\n\r]/ /g;
+
$form->{exchangerate} =
$form->format_amount(\%myconfig, $form->{exchangerate});
$vendor =
($form->{selectvendor})
- ? qq|<select name=vendor>$form->{selectvendor}</select>\n<input type=hidden name="selectvendor" value="$form->{selectvendor}">|
+ ? qq|<select name="vendor"
+onchange="document.getElementById('update_button').click();">| .
+ qq|$form->{selectvendor}</select>\n<input type=hidden name="selectvendor" value="| .
+ Q($form->{selectvendor}) . qq|">|
: qq|<input name=vendor value="$form->{vendor}" size=35>|;
$department = qq|