cvsuser     04/11/27 09:54:46

  Modified:    plugins/queue qmail-queue
  Log:
  Remove extraneous filehandling twiddling from qmail-queue that could cause 
weirdness if the exec failed.
  
  Revision  Changes    Path
  1.8       +3 -8      qpsmtpd/plugins/queue/qmail-queue
  
  Index: qmail-queue
  ===================================================================
  RCS file: /cvs/public/qpsmtpd/plugins/queue/qmail-queue,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- qmail-queue       27 Nov 2004 07:08:46 -0000      1.7
  +++ qmail-queue       27 Nov 2004 17:54:46 -0000      1.8
  @@ -99,16 +99,11 @@
       POSIX::dup2(fileno(MESSAGE_READER), 0) or die "Unable to dup 
MESSAGE_READER: $!";
       POSIX::dup2(fileno(ENVELOPE_READER), 1) or die "Unable to dup 
ENVELOPE_READER: $!";
   
  -    $self->log(LOGNOTICE, "Queuing to $queue_exec");
  +    my $ppid = getppid();
  +    $self->log(LOGNOTICE, "(for $ppid ) Queuing to $queue_exec");
   
       my $rc = exec $queue_exec;
   
  -    # restore the original STDIN and STDOUT
  -    open(STDIN, "<&SAVE_STDIN");
  -    open(STDOUT, ">&SAVE_STDOUT");
  -
  -    # NB: The "if not $rc" is redundant since exec() won't return if it
  -    # succeeds.
  -    exit 6 if not $rc;
  +    exit 6; # we'll only get here if the exec fails
     }
   }
  
  
  

Reply via email to