Fix stupid bugs...
This commit is contained in:
parent
83b10c4959
commit
79fcfe0707
@ -166,7 +166,7 @@ determineDeps x = do
|
|||||||
_ <- A.string "\" \""
|
_ <- A.string "\" \""
|
||||||
_y <- A.many1 $ A.satisfy (/= '"')
|
_y <- A.many1 $ A.satisfy (/= '"')
|
||||||
_ <- A.string "\""
|
_ <- A.string "\""
|
||||||
return $ Messages $ concat x'
|
return $ Messages x')
|
||||||
case ty of
|
case ty of
|
||||||
Messages{} -> return $ Just (ty, "")
|
Messages{} -> return $ Just (ty, "")
|
||||||
StaticFiles{} -> return $ Just (ty, "")
|
StaticFiles{} -> return $ Just (ty, "")
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user