cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove hardcoded path 

propellor runs as root, and /sbin should always be in root's path
This commit is contained in:
Joey Hess 2014-10-31 10:20:56 -04:00
parent 3a1f058c64
commit 2766558d61
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Propellor/Property/Firewall.hs
View File

@ -30,10 +30,10 @@ rule c t rs = property ("firewall rule: " <> show r) addIpTable
r = Rule c t rs r = Rule c t rs
addIpTable = liftIO $ do addIpTable = liftIO $ do
let args = toIpTable r let args = toIpTable r
exist <- boolSystem "/sbin/iptables" (chk args) exist <- boolSystem "iptables" (chk args)
if exist if exist
then return NoChange then return NoChange
else ifM (boolSystem "/sbin/iptables" (add args)) else ifM (boolSystem "iptables" (add args))
( return MadeChange , return FailedChange) ( return MadeChange , return FailedChange)
add params = (Param "-A") : params add params = (Param "-A") : params
chk params = (Param "-C") : params chk params = (Param "-C") : params