aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2012-07-15 01:31:19 +0100
committerIan Lynagh <igloo@earth.li>2012-07-15 01:31:19 +0100
commit45f24c7fb08b66f4160e94216599be6594f02416 (patch)
treef6b15d150f34d050d8ced97ea4170936bf0beffe /src
parent105f31e1b5b1428ae27590893740017327d322ff (diff)
Follow changes in GHC
Diffstat (limited to 'src')
-rw-r--r--src/Haddock/Backends/LaTeX.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Haddock/Backends/LaTeX.hs b/src/Haddock/Backends/LaTeX.hs
index f03801bb..3a7cdd82 100644
--- a/src/Haddock/Backends/LaTeX.hs
+++ b/src/Haddock/Backends/LaTeX.hs
@@ -24,7 +24,7 @@ import GHC
import OccName
import Name ( nameOccName )
import RdrName ( rdrNameOcc )
-import FastString ( unpackFS, unpackLitString )
+import FastString ( unpackFS, unpackLitString, zString )
import qualified Data.Map as Map
import System.Directory
@@ -170,6 +170,7 @@ string_txt :: TextDetails -> String -> String
string_txt (Chr c) s = c:s
string_txt (Str s1) s2 = s1 ++ s2
string_txt (PStr s1) s2 = unpackFS s1 ++ s2
+string_txt (ZStr s1) s2 = zString s1 ++ s2
string_txt (LStr s1 _) s2 = unpackLitString s1 ++ s2