Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision fc63cd43

Von Moritz Bunkus vor mehr als 9 Jahren hinzugefügt

gl.pl: komischen Debug-Code mit nicht existierenden Filehandles entfernt

Unterschiede anzeigen:

bin/mozilla/gl.pl
306 306
  # add employee here, so that variable is still known and passed in url when choosing a different sort order in resulting table
307 307
  my @hidden_variables = qw(accno source reference department description notes project_id datefrom dateto employee_id datesort category l_subtotal);
308 308
  push @hidden_variables, map { "l_${_}" } @columns;
309
  foreach ( @hidden_variables ) {
310
      print URL "$_\n";
311
  };
312 309

  
313 310
  my $employee = $form->{employee_id} ? SL::DB::Employee->new(id => $form->{employee_id})->load->name : '';
314 311

  
......
332 329

  
333 330

  
334 331
  my $callback = build_std_url('action=generate_report', grep { $form->{$_} } @hidden_variables);
335
  print URL $callback;
336
  close URL;
337 332

  
338 333
  $form->{l_credit_accno}     = 'Y';
339 334
  $form->{l_debit_accno}      = 'Y';

Auch abrufbar als: Unified diff