Revision c90ba6c8
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/common.pl | ||
|---|---|---|
| 168 | 168 |
|
| 169 | 169 |
my $callback = "$form->{script}?action=part_selection_internal&";
|
| 170 | 170 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 171 |
(qw(login path password partnumber description input_partnumber input_description input_partsid), grep({ /^[fl]_/ } keys %$form)));
|
|
| 171 |
(qw(login password partnumber description input_partnumber input_description input_partsid), grep({ /^[fl]_/ } keys %$form)));
|
|
| 172 | 172 |
|
| 173 | 173 |
my @header_sort = qw(partnumber description); |
| 174 | 174 |
my %header_title = ( "partnumber" => $locale->text("Part Number"),
|
| ... | ... | |
| 209 | 209 |
|
| 210 | 210 |
my $callback = "$form->{script}?action=project_selection_internal&";
|
| 211 | 211 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 212 |
(qw(login path password projectnumber description input_projectnumber input_description input_project_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 212 |
(qw(login password projectnumber description input_projectnumber input_description input_project_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 213 | 213 |
|
| 214 | 214 |
my @header_sort = qw(projectnumber description); |
| 215 | 215 |
my %header_title = ( "projectnumber" => $locale->text("Project Number"),
|
| ... | ... | |
| 250 | 250 |
|
| 251 | 251 |
my $callback = "$form->{script}?action=employee_selection_internal&";
|
| 252 | 252 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 253 |
(qw(login path password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 253 |
(qw(login password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 254 | 254 |
|
| 255 | 255 |
my @header_sort = qw(name); |
| 256 | 256 |
my %header_title = ( "name" => $locale->text("Name"),
|
| ... | ... | |
| 290 | 290 |
|
| 291 | 291 |
my $callback = "$form->{script}?action=delivery_customer_selection&";
|
| 292 | 292 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 293 |
(qw(login path password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 293 |
(qw(login password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 294 | 294 |
|
| 295 | 295 |
my @header_sort = qw(name customernumber address); |
| 296 | 296 |
my %header_title = ( "name" => $locale->text("Name"),
|
| ... | ... | |
| 332 | 332 |
|
| 333 | 333 |
my $callback = "$form->{script}?action=vendor_selection&";
|
| 334 | 334 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 335 |
(qw(login path password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 335 |
(qw(login password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 336 | 336 |
|
| 337 | 337 |
my @header_sort = qw(name customernumber address); |
| 338 | 338 |
my %header_title = ( "name" => $locale->text("Name"),
|
| ... | ... | |
| 408 | 408 |
|
| 409 | 409 |
my $callback = "$form->{script}?action=set_longdescription&";
|
| 410 | 410 |
map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
|
| 411 |
(qw(login path password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 411 |
(qw(login password name input_name input_id), grep({ /^[fl]_/ } keys %$form)));
|
|
| 412 | 412 |
|
| 413 | 413 |
$form->{"title"} = $locale->text("Enter longdescription");
|
| 414 | 414 |
$form->header(); |
Auch abrufbar als: Unified diff
Die Variable "path" gibt es nicht mehr.