View | Details | Raw Unified | Return to bug 7857
Collapse All | Expand All

(-)a/installer/install.pl (-2 / +10 lines)
Lines 185-191 elsif ( $step && $step == 3 ) { Link Here
185
        # we have finished, just redirect to mainpage.
185
        # we have finished, just redirect to mainpage.
186
        #
186
        #
187
        print $query->redirect("/cgi-bin/koha/mainpage.pl");
187
        print $query->redirect("/cgi-bin/koha/mainpage.pl");
188
        exit 1;
188
        exit;
189
    }
189
    }
190
    elsif ( $op && $op eq 'finish' ) {
190
    elsif ( $op && $op eq 'finish' ) {
191
        $installer->set_version_syspref();
191
        $installer->set_version_syspref();
Lines 312-317 elsif ( $step && $step == 3 ) { Link Here
312
        # Not 1st install, the only sub-step : update database
312
        # Not 1st install, the only sub-step : update database
313
        #
313
        #
314
        #Do updatedatabase And report
314
        #Do updatedatabase And report
315
316
	if ( ! defined $ENV{PERL5LIB} ) {
317
		my $find = "C4/Context.pm";
318
		my $path = $INC{$find};
319
		$path =~ s/\Q$find\E//;
320
		$ENV{PERL5LIB} = $path;
321
		warn "# plack? inserted PERL5LIB $ENV{PERL5LIB}\n";
322
	}
323
315
        my $cmd = C4::Context->config("intranetdir") . "/installer/data/$info{dbms}/updatedatabase.pl";
324
        my $cmd = C4::Context->config("intranetdir") . "/installer/data/$info{dbms}/updatedatabase.pl";
316
        my ($success, $error_code, $full_buf, $stdout_buf, $stderr_buf) = IPC::Cmd::run(command => $cmd, verbose => 0);
325
        my ($success, $error_code, $full_buf, $stdout_buf, $stderr_buf) = IPC::Cmd::run(command => $cmd, verbose => 0);
317
326
318
- 

Return to bug 7857