diff options
author | Guilhem Moulin <guilhem@fripost.org> | 2016-03-09 21:15:41 +0100 |
---|---|---|
committer | Guilhem Moulin <guilhem@fripost.org> | 2016-03-09 21:15:41 +0100 |
commit | 1135600bcaacc7ad3a8d205f7987c5370dcc1688 (patch) | |
tree | 7af0993c6cdf19bde6dc92bc4361c5a48ad034fd /interimap | |
parent | 435d6bb2731f0205ff0789e8abeca189e0a35204 (diff) | |
parent | ebacf74fdb3a507c6b0d865f4e9a8a6e59dbb10c (diff) |
Merge branch 'master' into debian
Diffstat (limited to 'interimap')
-rwxr-xr-x | interimap | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -26,7 +26,7 @@ my $NAME = 'interimap'; use Getopt::Long qw/:config posix_default no_ignore_case gnu_compat bundling auto_version/; use DBI (); -use Fcntl qw/F_GETFL F_SETFL FD_CLOEXEC/; +use Fcntl qw/F_GETFD F_SETFD FD_CLOEXEC/; use List::Util 'first'; use lib 'lib'; @@ -103,8 +103,8 @@ my ($DBFILE, $LOCKFILE, $LOGGER_FD); open $LOGGER_FD, '>>', $CONF->{_}->{logfile} or die "Can't open $CONF->{_}->{logfile}: $!\n"; $LOGGER_FD->autoflush(1); - my $flags = fcntl($LOGGER_FD, F_GETFL, 0) or die "fcntl F_GETFL: $!"; - fcntl($LOGGER_FD, F_SETFL, $flags | FD_CLOEXEC) or die "fcntl F_SETFL: $!"; + my $flags = fcntl($LOGGER_FD, F_GETFD, 0) or die "fcntl F_GETFD: $!"; + fcntl($LOGGER_FD, F_SETFD, $flags | FD_CLOEXEC) or die "fcntl F_SETFD: $!"; } elsif ($CONFIG{debug}) { $LOGGER_FD = \*STDERR; |