diff options
author | Ben Gamari <ben@smart-cactus.org> | 2016-04-16 17:51:09 +0200 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2016-04-16 17:51:09 +0200 |
commit | a77728cc274751e8b8077b3ccc8aacc7d00bf36d (patch) | |
tree | adf359ede9d324d1db4985dbc80dbc30e479a1d8 /haddock-api/src/Haddock/Types.hs | |
parent | 1204af7031c627b39d4cef7cdb5842cdc199ddde (diff) | |
parent | b89d1c2456bdb2d4208d94ded56155f7088a37d0 (diff) |
Merge pull request #489 from mpickering/unused-functions
Remove some unused functions
Diffstat (limited to 'haddock-api/src/Haddock/Types.hs')
-rw-r--r-- | haddock-api/src/Haddock/Types.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/haddock-api/src/Haddock/Types.hs b/haddock-api/src/Haddock/Types.hs index 3a4df70c..eacf4473 100644 --- a/haddock-api/src/Haddock/Types.hs +++ b/haddock-api/src/Haddock/Types.hs @@ -268,11 +268,6 @@ noDocForDecl :: DocForDecl name noDocForDecl = (Documentation Nothing Nothing, Map.empty) -unrenameDocForDecl :: DocForDecl DocName -> DocForDecl Name -unrenameDocForDecl (doc, fnArgsDoc) = - (fmap getName doc, (fmap . fmap) getName fnArgsDoc) - - ----------------------------------------------------------------------------- -- * Cross-referencing ----------------------------------------------------------------------------- |