Revision 152d10ef
Von Niclas Zimmermann vor mehr als 11 Jahren hinzugefügt
| bin/mozilla/fu.pl | ||
|---|---|---|
| 10 | 10 |
sub _collect_links {
|
| 11 | 11 |
$main::lxdebug->enter_sub(); |
| 12 | 12 |
|
| 13 |
$main::auth->assert('productivity');
|
|
| 14 |
|
|
| 15 | 13 |
my $dest = shift; |
| 16 | 14 |
|
| 17 | 15 |
my $form = $main::form; |
| ... | ... | |
| 30 | 28 |
sub add {
|
| 31 | 29 |
$main::lxdebug->enter_sub(); |
| 32 | 30 |
|
| 33 |
$main::auth->assert('productivity');
|
|
| 34 |
|
|
| 35 | 31 |
my $form = $main::form; |
| 36 | 32 |
my %myconfig = %main::myconfig; |
| 37 | 33 |
my $locale = $main::locale; |
| ... | ... | |
| 61 | 57 |
sub edit {
|
| 62 | 58 |
$main::lxdebug->enter_sub(); |
| 63 | 59 |
|
| 64 |
$main::auth->assert('productivity');
|
|
| 65 |
|
|
| 66 | 60 |
my $form = $main::form; |
| 67 | 61 |
my $locale = $main::locale; |
| 68 | 62 |
|
| ... | ... | |
| 88 | 82 |
sub display_form {
|
| 89 | 83 |
$main::lxdebug->enter_sub(); |
| 90 | 84 |
|
| 91 |
$main::auth->assert('productivity');
|
|
| 92 |
|
|
| 93 | 85 |
my $form = $main::form; |
| 94 | 86 |
|
| 95 | 87 |
$form->get_lists("employees" => "EMPLOYEES");
|
| ... | ... | |
| 110 | 102 |
sub save_follow_up {
|
| 111 | 103 |
$main::lxdebug->enter_sub(); |
| 112 | 104 |
|
| 113 |
$main::auth->assert('productivity');
|
|
| 114 |
|
|
| 115 | 105 |
my $form = $main::form; |
| 116 | 106 |
my $locale = $main::locale; |
| 117 | 107 |
|
| ... | ... | |
| 149 | 139 |
sub finish {
|
| 150 | 140 |
$main::lxdebug->enter_sub(); |
| 151 | 141 |
|
| 152 |
$main::auth->assert('productivity');
|
|
| 153 |
|
|
| 154 | 142 |
my $form = $main::form; |
| 155 | 143 |
my $locale = $main::locale; |
| 156 | 144 |
|
| ... | ... | |
| 187 | 175 |
sub delete {
|
| 188 | 176 |
$main::lxdebug->enter_sub(); |
| 189 | 177 |
|
| 190 |
$main::auth->assert('productivity');
|
|
| 191 |
|
|
| 192 | 178 |
my $form = $main::form; |
| 193 | 179 |
my $locale = $main::locale; |
| 194 | 180 |
|
| ... | ... | |
| 225 | 211 |
sub search {
|
| 226 | 212 |
$main::lxdebug->enter_sub(); |
| 227 | 213 |
|
| 228 |
$main::auth->assert('productivity');
|
|
| 229 |
|
|
| 230 | 214 |
my $form = $main::form; |
| 231 | 215 |
my $locale = $main::locale; |
| 232 | 216 |
|
| ... | ... | |
| 244 | 228 |
sub report {
|
| 245 | 229 |
$main::lxdebug->enter_sub(); |
| 246 | 230 |
|
| 247 |
$main::auth->assert('productivity');
|
|
| 248 |
|
|
| 249 | 231 |
my $form = $main::form; |
| 250 | 232 |
my %myconfig = %main::myconfig; |
| 251 | 233 |
my $locale = $main::locale; |
| ... | ... | |
| 358 | 340 |
sub report_for_todo_list {
|
| 359 | 341 |
$main::lxdebug->enter_sub(); |
| 360 | 342 |
|
| 361 |
$main::auth->assert('productivity');
|
|
| 362 |
|
|
| 363 | 343 |
my $form = $main::form; |
| 364 | 344 |
|
| 365 | 345 |
my @report_params = qw(created_for subject body reference follow_up_date_from follow_up_date_to itime_from itime_to due_only all_users done not_done); |
| ... | ... | |
| 399 | 379 |
sub edit_access_rights {
|
| 400 | 380 |
$main::lxdebug->enter_sub(); |
| 401 | 381 |
|
| 402 |
$main::auth->assert('productivity');
|
|
| 403 |
|
|
| 404 | 382 |
my $form = $main::form; |
| 405 | 383 |
my $locale = $main::locale; |
| 406 | 384 |
|
| ... | ... | |
| 421 | 399 |
sub save_access_rights {
|
| 422 | 400 |
$main::lxdebug->enter_sub(); |
| 423 | 401 |
|
| 424 |
$main::auth->assert('productivity');
|
|
| 425 |
|
|
| 426 | 402 |
my $form = $main::form; |
| 427 | 403 |
my $locale = $main::locale; |
| 428 | 404 |
|
| ... | ... | |
| 451 | 427 |
} |
| 452 | 428 |
|
| 453 | 429 |
sub save {
|
| 454 |
$main::auth->assert('productivity');
|
|
| 455 |
|
|
| 456 | 430 |
if ($main::form->{save_nextsub}) {
|
| 457 | 431 |
call_sub($main::form->{save_nextsub});
|
| 458 | 432 |
} else {
|
Auch abrufbar als: Unified diff
Revert "Recht für Anzeige der Produktivität"
This reverts commit a27cd427a2689b49a7642884edd2d24555305a4b.