diff options
| -rw-r--r-- | pod/perlipc.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlipc.pod b/pod/perlipc.pod index 3e916a07af..de6ba581e6 100644 --- a/pod/perlipc.pod +++ b/pod/perlipc.pod @@ -536,7 +536,7 @@ output doesn't wind up on the user's terminal). or die "Can't write to /dev/null: $!"; defined(my $pid = fork) or die "Can't fork: $!"; exit if $pid; - setsid or die "Can't start a new session: $!"; + die "Can't start a new session: $!" if setsid == -1; open STDERR, '>&STDOUT' or die "Can't dup stdout: $!"; } |