Revision e2b9e173
Von Sven Schöling vor etwa 15 Jahren hinzugefügt
| bin/mozilla/ap.pl | ||
|---|---|---|
| 170 | 170 |
} |
| 171 | 171 |
|
| 172 | 172 |
# departments |
| 173 |
if (@{ $form->{all_departments} }) {
|
|
| 173 |
if (@{ $form->{all_departments} || [] }) {
|
|
| 174 | 174 |
$form->{selectdepartment} = "<option>\n";
|
| 175 | 175 |
$form->{department} = "$form->{department}--$form->{department_id}";
|
| 176 | 176 |
|
| 177 | 177 |
map {
|
| 178 | 178 |
$form->{selectdepartment} .=
|
| 179 | 179 |
"<option>$_->{description}--$_->{id}\n"
|
| 180 |
} (@{ $form->{all_departments} });
|
|
| 180 |
} (@{ $form->{all_departments} || [] });
|
|
| 181 | 181 |
} |
| 182 | 182 |
|
| 183 | 183 |
$form->{employee} = "$form->{employee}--$form->{employee_id}";
|
| ... | ... | |
| 1222 | 1222 |
} |
| 1223 | 1223 |
|
| 1224 | 1224 |
# departments |
| 1225 |
if (@{ $form->{all_departments} }) {
|
|
| 1225 |
if (@{ $form->{all_departments} || [] }) {
|
|
| 1226 | 1226 |
$form->{selectdepartment} = "<option>\n";
|
| 1227 | 1227 |
|
| 1228 | 1228 |
map {
|
| 1229 | 1229 |
$form->{selectdepartment} .=
|
| 1230 | 1230 |
"<option>$_->{description}--$_->{id}\n"
|
| 1231 |
} (@{ $form->{all_departments} });
|
|
| 1231 |
} (@{ $form->{all_departments} || [] });
|
|
| 1232 | 1232 |
} |
| 1233 | 1233 |
|
| 1234 | 1234 |
my $department = qq| |
Auch abrufbar als: Unified diff
Alle Vorkommen von all_departments abgesichert.