[haddock] #100: Haddock dies with Maybe.fromJust: Nothing when using template haskell

[haddock]

#100: Haddock dies with Maybe.fromJust: Nothing when using template haskell
-------------------+--------------------------------------------------------
Reporter:  topi    |       Owner:       
    Type:  defect  |      Status:  new  
Priority:  major   |   Milestone:  2.4.2
 Version:  2.4.1   |    Keywords:       
-------------------+--------------------------------------------------------
 Given the files:

 A.hs

 {{{
 {-# LANGUAGE TemplateHaskell #-}

 module A where

 import Language.Haskell.TH

 f :: String -> Q [Dec]
 f = undefined

 }}}

 B.hs

 {{{
 {-# LANGUAGE TemplateHaskell #-}

 module B where

 import A

 $(f "abc")

 }}}

 And haddock (fresh from hackage):

 {{{
 $ haddock --version
 Haddock version 2.4.2, (c) Simon Marlow 2006
 Ported to use the GHC API by David Waern 2006-2008
 }}}

 My haddock dies with:

 $ haddock --html -o temp A.hs B.hs
 haddock: internal Haddock or GHC error: Maybe.fromJust: Nothing

 Is there no support for template haskell. :-(

-- 
Ticket URL: <http://trac.haskell.org/haddock/ticket/100>
haddock <http://www.haskell.org/haddock>
Haddock, The Haskell Documentation Tool