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

Implement parseEnum in terms of lookup

Browse Source
This commit is contained in:
Joseph C. Sible
2023-12-21 13:48:47 -05:00
parent f983d9ae93
commit dab77b2c8d
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
shellcheck.hs
View File

@@ -252,9 +252,9 @@ runFormatter sys format options files = do
else SomeProblems else SomeProblems
parseEnum name value list = parseEnum name value list =
case filter ((== value) . fst) list of case lookup value list of
[(name, value)] -> return value Just value -> return value
[] -> do Nothing -> do
printErr $ "Unknown value for --" ++ name ++ ". " ++ printErr $ "Unknown value for --" ++ name ++ ". " ++
"Valid options are: " ++ (intercalate ", " $ map fst list) "Valid options are: " ++ (intercalate ", " $ map fst list)
throwError SupportFailure throwError SupportFailure