diff options
author | Guilhem Moulin <guilhem@fripost.org> | 2016-06-12 22:17:44 +0200 |
---|---|---|
committer | Guilhem Moulin <guilhem@fripost.org> | 2016-06-12 22:17:44 +0200 |
commit | f2f4d314990f67ad1ad842951f724f6bda678cfd (patch) | |
tree | d6ff66c86a2baa62c3fa47a3719f20e0a9e0d58c | |
parent | 0cb3d9c8d688920fbe88721f36140a1281da3b9a (diff) |
pullimap: Clean up PATH.
-rwxr-xr-x | interimap | 2 | ||||
-rwxr-xr-x | pullimap | 4 |
2 files changed, 5 insertions, 1 deletions
@@ -33,7 +33,7 @@ use lib 'lib'; use Net::IMAP::InterIMAP qw/read_config compact_set/; # Clean up PATH -$ENV{PATH} = join ':', qw{/usr/local/bin /usr/bin /bin}; +$ENV{PATH} = join ':', qw{/usr/bin /bin}; delete @ENV{qw/IFS CDPATH ENV BASH_ENV/}; my %CONFIG; @@ -33,6 +33,10 @@ use Socket qw/PF_INET PF_INET6 SOCK_STREAM/; use lib 'lib'; use Net::IMAP::InterIMAP qw/read_config compact_set/; +# Clean up PATH +$ENV{PATH} = join ':', qw{/usr/bin /bin}; +delete @ENV{qw/IFS CDPATH ENV BASH_ENV/}; + my %CONFIG; sub usage(;$) { my $rv = shift // 0; |