[commit: haddock] 2.17.3.1-spanfix: UnfelpfulSpan line number omitted (3a22efd)

git at git.haskell.org git at git.haskell.org
Tue Nov 28 11:50:17 UTC 2017


Repository : ssh://git@git.haskell.org/haddock

On branch  : 2.17.3.1-spanfix
Link       : http://git.haskell.org/haddock.git/commitdiff/3a22efd9842ea3fd503bfbb8ee4815614e8daeea

>---------------------------------------------------------------

commit 3a22efd9842ea3fd503bfbb8ee4815614e8daeea
Author: Oleg Grenrus <oleg.grenrus at iki.fi>
Date:   Tue May 24 16:19:46 2016 +0300

    UnfelpfulSpan line number omitted
    
    Kind of resolves https://github.com/haskell/haddock/issues/508


>---------------------------------------------------------------

3a22efd9842ea3fd503bfbb8ee4815614e8daeea
 haddock-api/src/Haddock/Backends/Xhtml/Utils.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Utils.hs b/haddock-api/src/Haddock/Backends/Xhtml/Utils.hs
index 1d49807..391bb50 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/Utils.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/Utils.hs
@@ -75,8 +75,7 @@ spliceURL' maybe_file maybe_mod maybe_name maybe_loc = run
       case span_ of
       RealSrcSpan span__ ->
         show $ srcSpanStartLine span__
-      UnhelpfulSpan _ ->
-        error "spliceURL UnhelpfulSpan"
+      UnhelpfulSpan _ -> ""
 
   run "" = ""
   run ('%':'M':rest) = mdl  ++ run rest



More information about the ghc-commits mailing list