blob: 5e8002501100022be937364edba3c18f6626d649 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
diff -ru Paranoid-2.05/lib/Paranoid.pm /tmp/Paranoid-2.05/lib/Paranoid.pm
--- Paranoid-2.05/lib/Paranoid.pm 2017-02-06 05:48:57.000000000 -0500
+++ /tmp/Paranoid-2.05/lib/Paranoid.pm 2018-05-10 06:40:35.286313299 -0400
@@ -61,7 +61,7 @@
my $path = shift;
- $path = '/bin:/usr/bin' unless defined $path;
+ $path = '__BLESSED_PATH__' unless defined $path;
delete @ENV{qw(IFS CDPATH ENV BASH_ENV)};
$ENV{PATH} = $path;
Binary files Paranoid-2.05/lib/.Paranoid.pm.swp and /tmp/Paranoid-2.05/lib/.Paranoid.pm.swp differ
diff -ru Paranoid-2.05/t/01_init_core.t /tmp/Paranoid-2.05/t/01_init_core.t
--- Paranoid-2.05/t/01_init_core.t 2016-07-12 04:49:33.000000000 -0400
+++ /tmp/Paranoid-2.05/t/01_init_core.t 2018-05-10 06:43:41.323183381 -0400
@@ -35,5 +35,5 @@
ok( psecureEnv('/bin:/sbin'), 'psecureEnv 1' );
is( $ENV{PATH}, '/bin:/sbin', 'Validated PATH' );
ok( psecureEnv(), 'psecureEnv 2' );
-is( $ENV{PATH}, '/bin:/usr/bin', 'Validated PATH' );
+is( $ENV{PATH}, '__BLESSED_PATH__', 'Validated PATH' );
|