Revision 428bc365
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
bin/mozilla/ct.pl | ||
---|---|---|
305 | 305 |
my $cvar_configs = CVar->get_configs('module' => 'Contacts'); |
306 | 306 |
|
307 | 307 |
my @columns = qw( |
308 |
cp_id vcname vcnumber cp_name cp_givenname cp_street cp_zipcode cp_city cp_phone1 cp_phone2 |
|
309 |
cp_mobile1 cp_mobile2 cp_email cp_abteilung cp_position cp_birthday cp_gender |
|
308 |
cp_id vcname vcnumber cp_name cp_givenname cp_street cp_zipcode cp_city cp_phone1 cp_phone2 cp_privatphone
|
|
309 |
cp_mobile1 cp_mobile2 cp_fax cp_email cp_privatemail cp_abteilung cp_position cp_birthday cp_gender
|
|
310 | 310 |
); |
311 | 311 |
|
312 | 312 |
my @includeable_custom_variables = grep { $_->{includeable} } @{ $cvar_configs }; |
... | ... | |
342 | 342 |
'cp_position' => { 'text' => $::locale->text('Function/position'), }, |
343 | 343 |
'cp_birthday' => { 'text' => $::locale->text('Birthday'), }, |
344 | 344 |
'cp_gender' => { 'text' => $::locale->text('Gender'), }, |
345 |
'cp_fax' => { 'text' => $::locale->text('Fax'), }, |
|
346 |
'cp_privatphone' => { 'text' => $::locale->text('Private Phone') }, |
|
347 |
'cp_privatemail' => { 'text' => $::locale->text('Private E-Mail') }, |
|
345 | 348 |
%column_defs_cvars, |
346 | 349 |
); |
347 | 350 |
|
... | ... | |
399 | 402 |
|
400 | 403 |
$row->{vcname}->{link} = build_std_url('action=edit', 'id=' . E($ref->{vcid}), 'db=' . E($ref->{db}), 'callback', @hidden_nondefault); |
401 | 404 |
$row->{vcnumber}->{link} = $row->{vcname}->{link}; |
402 |
$row->{cp_email}->{link} = 'mailto:' . E($ref->{cp_email}); |
|
405 |
|
|
406 |
for (qw(cp_email cp_privatemail)) { |
|
407 |
$row->{$_}->{link} = 'mailto:' . E($ref->{$_}) if $ref->{$_}; |
|
408 |
} |
|
403 | 409 |
|
404 | 410 |
$report->add_data($row); |
405 | 411 |
} |
Auch abrufbar als: Unified diff
Bericht Ansprechpersonen: weitere Spalten ausgeben können