aboutsummaryrefslogtreecommitdiff
path: root/haddock-api/src/Haddock/Types.hs
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2016-03-04 21:04:02 +0000
committerBen Gamari <ben@smart-cactus.org>2016-04-16 17:58:21 +0200
commit03b02a0faa5381d3a614e3f39b36923b0e988051 (patch)
tree117c87fea50ed2776687d1cc58d0829e2a364641 /haddock-api/src/Haddock/Types.hs
parent82f5ef8484fb91230a83d26c971a7082547e32b8 (diff)
Remove unused functions
(cherry picked from commit b89d1c2456bdb2d4208d94ded56155f7088a37d0)
Diffstat (limited to 'haddock-api/src/Haddock/Types.hs')
-rw-r--r--haddock-api/src/Haddock/Types.hs5
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
-----------------------------------------------------------------------------