aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2010-04-08 21:20:00 +0000
committerDavid Waern <david.waern@gmail.com>2010-04-08 21:20:00 +0000
commit6f47cab6685dd30c9795fe56eb947cd94c7255ee (patch)
tree8b093beb2084add5f7898b6a44dbf2a72e2f80b3 /src/Haddock
parenta897d5c77d0e99c586023cc4c14062ef7cc4f8a2 (diff)
Improve function name
Diffstat (limited to 'src/Haddock')
-rw-r--r--src/Haddock/Interface.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Haddock/Interface.hs b/src/Haddock/Interface.hs
index ffe2ae71..33a2f7de 100644
--- a/src/Haddock/Interface.hs
+++ b/src/Haddock/Interface.hs
@@ -92,8 +92,8 @@ createInterfaces' verbosity modules flags instIfaceMap = do
dflags <- getSessionDynFlags
_ <- setSessionDynFlags dflags { hscTarget = defaultObjectTarget }
-- we need to set defaultObjectTarget on all the ModSummaries as well
- let addHscAsm m = m { ms_hspp_opts = (ms_hspp_opts m) { hscTarget = defaultObjectTarget } }
- return (map addHscAsm modgraph)
+ let addDefTarget m = m { ms_hspp_opts = (ms_hspp_opts m) { hscTarget = defaultObjectTarget } }
+ return (map addDefTarget modgraph)
else return modgraph
let orderedMods = flattenSCCs $ topSortModuleGraph False modgraph' Nothing