pullimap: Clean up PATH.

diff --git a/interimap b/interimap
index 17d28c2e209305cf5bc547bba74d0f22098101bc..150c754f92b8cde17a6784390a7a35b504455298 100755 (executable)
--- a/interimap
+++ b/interimap
@@ -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;

diff --git a/pullimap b/pullimap
index 65e222b95b88e615d9eff84b6a01906e097ba7e4..054048c9b18059ca565ce6ae132071cde85d36ad 100755 (executable)
--- a/pullimap
+++ b/pullimap
@@ -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;