diff options
| author | Matthías Páll Gissurarson <mpg@mpg.is> | 2020-06-19 17:11:25 +0200 |
|---|---|---|
| committer | Matthías Páll Gissurarson <mpg@mpg.is> | 2020-06-26 19:07:03 +0200 |
| commit | 54ed6ae2556dc787916e2d56ce0e99808af14e61 (patch) | |
| tree | ae573c3b51cd97067bd8cf8ae88e716050861179 | |
| parent | caae45aa98a7ca5182bb52aeafc22fd91e4ceb59 (diff) | |
Adapt Haddock for QualifiedDo
| -rw-r--r-- | haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs index 6ced4924..f8267f21 100644 --- a/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs +++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Parser.hs @@ -180,7 +180,7 @@ classify tok = ITdata -> TkKeyword ITdefault -> TkKeyword ITderiving -> TkKeyword - ITdo -> TkKeyword + ITdo {} -> TkKeyword ITelse -> TkKeyword IThiding -> TkKeyword ITforeign -> TkKeyword @@ -213,7 +213,7 @@ classify tok = ITcapiconv -> TkKeyword ITprimcallconv -> TkKeyword ITjavascriptcallconv -> TkKeyword - ITmdo -> TkKeyword + ITmdo {} -> TkKeyword ITfamily -> TkKeyword ITrole -> TkKeyword ITgroup -> TkKeyword |