taint mode fix for FreeBSD
This commit is contained in:
parent
2ec58b40f8
commit
4c97c94a0a
|
@ -114,6 +114,8 @@ sub new {
|
||||||
if ($paths =~ /^(.*)$/) {
|
if ($paths =~ /^(.*)$/) {
|
||||||
$ENV{PATH} = $1;
|
$ENV{PATH} = $1;
|
||||||
}
|
}
|
||||||
|
# Otherwise the qx() operator wont work:
|
||||||
|
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
|
||||||
chomp($path = qx(i3 --get-socketpath));
|
chomp($path = qx(i3 --get-socketpath));
|
||||||
# Circumventing taint mode again: the socket can be anywhere on the
|
# Circumventing taint mode again: the socket can be anywhere on the
|
||||||
# system and that’s okay.
|
# system and that’s okay.
|
||||||
|
|
Loading…
Reference in New Issue