added invalidAccess stub to fontify functions
This commit is contained in:
parent
7350e8a4cd
commit
ea7d2dff2c
1 changed files with 3 additions and 3 deletions
|
@ -70,9 +70,9 @@ fontMap = [ (attrName "assignment" , fg Vty.blue)
|
||||||
]
|
]
|
||||||
|
|
||||||
fontify :: CheckString -> Fontifications
|
fontify :: CheckString -> Fontifications
|
||||||
fontify = concatApply [ assignments, strings
|
fontify = concatApply [ assignments, invalidAccess
|
||||||
, returns, guards, comments
|
, strings, returns, guards
|
||||||
, mismatchedBrackets
|
, comments, mismatchedBrackets
|
||||||
, mismatchedQuotes]
|
, mismatchedQuotes]
|
||||||
|
|
||||||
concatApply :: [Fontifier] -> CheckString -> Fontifications
|
concatApply :: [Fontifier] -> CheckString -> Fontifications
|
||||||
|
|
Loading…
Reference in a new issue