Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision c607fb40

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

  • ID c607fb403082a05a5c9f16b084de5b99203bfad7
  • Vorgänger 258119bf
  • Nachfolger 7218ba44

Indirekte Objektnotation fixen

Unterschiede anzeigen:

bin/mozilla/io.pl
my $script = $form->{"script"};
$script =~ s|.*/||;
$script =~ s|.pl$||;
$locale = new Locale($::lx_office_conf{system}->{language}, $script);
$locale = Locale->new($::lx_office_conf{system}->{language}, $script);
map { $form->{"select$_"} = "" } ($form->{vc}, "currency");
......
$form->error($locale->text('Select postscript or PDF!'))
if ($form->{format} !~ /(postscript|pdf)/);
$old_form = new Form;
$old_form = Form->new;
map { $old_form->{$_} = $form->{$_} } keys %$form;
}

Auch abrufbar als: Unified diff