7x31
/
shellcheck
mirror of https://github.com/koalaman/shellcheck.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Simplify getCommandNameAndToken

This commit is contained in:
Joseph C. Sible 2020-04-05 19:01:56 -04:00
parent 01f4423465
commit 8f105074fe
1 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/ShellCheck/ASTLib.hs
View File

@ -317,13 +317,11 @@ getCommandNameAndToken :: Token -> (Maybe String, Token)
getCommandNameAndToken t = fromMaybe (Nothing, t) $ do
(T_SimpleCommand _ _ (w:rest)) <- getCommand t
s <- getLiteralString w
if "busybox" `isSuffixOf` s || "builtin" == s
then
case rest of
(applet:_) -> return (getLiteralString applet, applet)
_ -> return (Just s, w)
else
return (Just s, w)
return $ case rest of
(applet:_) | "busybox" `isSuffixOf` s || "builtin" == s ->
(getLiteralString applet, applet)
_ ->
(Just s, w)
-- If a command substitution is a single command, get its name.