taint mode fix for FreeBSD

This commit is contained in:
Michael Stapelberg 2012-07-10 18:55:05 +02:00
parent 2ec58b40f8
commit 4c97c94a0a
1 changed files with 2 additions and 0 deletions

View File

@ -114,6 +114,8 @@ sub new {
if ($paths =~ /^(.*)$/) {
$ENV{PATH} = $1;
}
# Otherwise the qx() operator wont work:
delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
chomp($path = qx(i3 --get-socketpath));
# Circumventing taint mode again: the socket can be anywhere on the
# system and thats okay.