3
0
Fork 0
forked from mirrors/nixpkgs
nixpkgs/pkgs/development/perl-modules/Paranoid-blessed-path.patch

24 lines
1 KiB
Diff
Raw Normal View History

2018-05-10 11:47:31 +01:00
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' );