mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-09-17 18:59:07 +03:00
Remove unnecessary error from fileExtensionMatch
This commit is contained in:
parent
3a5df29251
commit
194afe697f
@ -782,7 +782,6 @@ fileExtensionMatch ext i = case fileInfoFileType i of
|
||||
Just Directory -> True
|
||||
Just RegularFile -> ('.' : (toLower <$> ext)) `isSuffixOf` (toLower <$> fileInfoFilename i)
|
||||
Just SymbolicLink -> case fileInfoLinkTargetType i of
|
||||
Nothing -> error "impossible"
|
||||
Just Directory -> True
|
||||
_ -> False
|
||||
_ -> False
|
Loading…
Reference in New Issue
Block a user