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

(-)a/tools/stage-marc-import.pl (-3 / +4 lines)
Lines 31-36 use CGI qw ( -utf8 ); Link Here
31
use CGI::Cookie;
31
use CGI::Cookie;
32
use MARC::File::USMARC;
32
use MARC::File::USMARC;
33
use Net::Server::Daemonize qw(daemonize);
33
use Net::Server::Daemonize qw(daemonize);
34
use File::Temp qw(tempdir);
34
35
35
# Koha modules used
36
# Koha modules used
36
use C4::Context;
37
use C4::Context;
Lines 120-129 if ($completedJobID) { Link Here
120
            exit 0;
121
            exit 0;
121
        } elsif (defined $pid) {
122
        } elsif (defined $pid) {
122
            # Daemonize the child process os the parent will print its output
123
            # Daemonize the child process os the parent will print its output
123
            my $pidfile = "/tmp/async$$.pid"; # deamonize requires a pid file even though it is supposed to be optional
124
            # deamonize requires a pid file even though it is supposed to be optional
125
            my $dir = tempdir( CLEANUP => 1 );
126
            my $pidfile = "$dir/async$$.pid";
124
            my @current_user = getpwuid($<);
127
            my @current_user = getpwuid($<);
125
            daemonize( $current_user[2], $current_user[3], $pidfile );
128
            daemonize( $current_user[2], $current_user[3], $pidfile );
126
            unlink($pidfile);    # otherwise it doesn't go away
127
            # child
129
            # child
128
            # close STDOUT to signal to Apache that
130
            # close STDOUT to signal to Apache that
129
            # we're now running in the background
131
            # we're now running in the background
130
- 

Return to bug 20342