Revision dbda14c2
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| scripts/dbupgrade2_tool.pl | ||
|---|---|---|
| 349 | 349 |
exit 0; |
| 350 | 350 |
} |
| 351 | 351 |
|
| 352 |
my $db_charset = $::lx_office_conf{system}->{dbcharset};
|
|
| 353 |
$db_charset ||= Common::DEFAULT_CHARSET(); |
|
| 354 |
|
|
| 355 | 352 |
foreach my $control (@upgradescripts) {
|
| 356 | 353 |
$control->{file} =~ /\.(sql|pl)$/;
|
| 357 | 354 |
my $file_type = $1; |
| ... | ... | |
| 360 | 357 |
print "Applying upgrade $control->{file}\n";
|
| 361 | 358 |
|
| 362 | 359 |
if ($file_type eq "sql") {
|
| 363 |
$dbupgrader->process_query($dbh, "sql/Pg-upgrade2/$control->{file}", $control, $db_charset);
|
|
| 360 |
$dbupgrader->process_query($dbh, "sql/Pg-upgrade2/$control->{file}", $control);
|
|
| 364 | 361 |
} else {
|
| 365 |
$dbupgrader->process_perl_script($dbh, "sql/Pg-upgrade2/$control->{file}", $control, $db_charset);
|
|
| 362 |
$dbupgrader->process_perl_script($dbh, "sql/Pg-upgrade2/$control->{file}", $control);
|
|
| 366 | 363 |
} |
| 367 | 364 |
} |
| 368 | 365 |
|
Auch abrufbar als: Unified diff
Unterstützung für andere Datenbankencodings als Unicode/UTF-8 entfernt