Remove duplicate pathTo and unused replaceMultiLines

This commit is contained in:
Vidar Holen 2019-01-08 22:16:17 -08:00
parent e45b679d58
commit df7f00eaed
3 changed files with 22 additions and 41 deletions

View file

@ -484,7 +484,7 @@ prop_checkInteractiveSu4 = verifyNot checkInteractiveSu "su root < script"
checkInteractiveSu = CommandCheck (Basename "su") f
where
f cmd = when (length (arguments cmd) <= 1) $ do
path <- pathTo cmd
path <- getPathM cmd
when (all undirected path) $
info (getId cmd) 2117
"To run commands as another user, use su -c or sudo."