Revision bfdfc9ee
Von Sven Schöling vor etwa 11 Jahren hinzugefügt
sql/Pg-upgrade2/warehouse.pl | ||
---|---|---|
140 | 140 |
print_question(); |
141 | 141 |
return 2; |
142 | 142 |
} else { |
143 |
if ($::form->{do_migrate} eq 'Y') { |
|
143 |
if (defined $::form->{do_migrate} && $::form->{do_migrate} eq 'Y') {
|
|
144 | 144 |
# if yes, both warehouse and bin must be given |
145 | 145 |
if (!$::form->{import_warehouse} || !$::form->{bin_default}) { |
146 | 146 |
print_question(); |
... | ... | |
150 | 150 |
$do_sql_migration = 1; |
151 | 151 |
} |
152 | 152 |
} |
153 |
my $warehouse = $::form->{import_warehouse} ne '' ? $::form->{import_warehouse} : "Transfer"; |
|
154 |
my $bin = $::form->{bin_default} ne '' ? $::form->{bin_default} : "1"; |
|
153 |
my $warehouse = defined $::form->{import_warehouse} && $::form->{import_warehouse} ne '' ? $::form->{import_warehouse} : "Transfer";
|
|
154 |
my $bin = defined $::form->{bin_default} && $::form->{bin_default} ne '' ? $::form->{bin_default} : "1";
|
|
155 | 155 |
|
156 | 156 |
$warehouse = $self->dbh->quote($warehouse); |
157 | 157 |
$bin = $self->dbh->quote($bin); |
Auch abrufbar als: Unified diff
warnings unter 5.12.4