Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 74fca575

Von Sven Schöling vor fast 13 Jahren hinzugefügt

  • ID 74fca575d438232002756175338c23f55b8a6c12
  • Vorgänger 4000444b
  • Nachfolger 45970e73

Fixes für das "my $var if $cond;" pattern.

Unterschiede anzeigen:

SL/DATEV.pm
942 942
    push @values, $form->{accnoto};
943 943
  }
944 944

  
945
  my $where_str = ' WHERE ' . join(' AND ', map { "($_)" } @where) if (scalar @where);
945
  my $where_str = @where ? ' WHERE ' . join(' AND ', map { "($_)" } @where) : '';
946 946

  
947 947
  my $query     = qq|SELECT c.accno, c.description
948 948
                     FROM chart c

Auch abrufbar als: Unified diff