Get rid of our getOpt, as it already exists as lookup
This commit is contained in:
parent
2e52c2b56a
commit
3449e6be21
|
@ -2840,7 +2840,7 @@ checkReadWithoutR _ t@T_SimpleCommand {} | t `isUnqualifiedCommand` "read" =
|
|||
flags = getAllFlags t
|
||||
has_t0 = fromMaybe False $ do
|
||||
parsed <- getOpts flagsForRead flags
|
||||
t <- getOpt "t" parsed
|
||||
t <- lookup "t" parsed
|
||||
str <- getLiteralString t
|
||||
return $ str == "0"
|
||||
|
||||
|
|
|
@ -960,8 +960,6 @@ getOpts string flags = process flags
|
|||
more <- process rest2
|
||||
return $ (flag1, token1) : more
|
||||
|
||||
getOpt str flags = snd <$> (listToMaybe $ filter (\(f, _) -> f == str) $ flags)
|
||||
|
||||
supportsArrays shell = shell == Bash || shell == Ksh
|
||||
|
||||
-- Returns true if the shell is Bash or Ksh (sorry for the name, Ksh)
|
||||
|
|
Loading…
Reference in New Issue