diff options
-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; |