7x31/shellcheck
1
0
Fork 0
mirror of https://github.com/koalaman/shellcheck.git synced 2025-08-07 15:55:24 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fixed failing test

Browse Source
This commit is contained in:
Vidar Holen
2014-06-10 00:33:54 -07:00
parent d13253973b
commit b035331d4a
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
ShellCheck/Analytics.hs
View File

@@ -531,7 +531,8 @@ checkPipePitfalls _ (T_Pipeline id _ commands) = do
first func (x:_) = func (getId x)
first _ _ = return ()
hasShortParameter char list = any (\x -> "-" `isPrefixOf` x && char `elem` x) list
hasParameter string list = any (("--" ++ string) `isPrefixOf`) list
hasParameter string list =
any (isPrefixOf string . dropWhile (== '-')) list
checkPipePitfalls _ _ = return ()
indexOfSublists sub = f 0