From 79a39d2cd25221e74d24fcc5d002f73e349ec67e Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Sat, 10 May 2008 23:38:52 +0000
Subject: [PATCH] Fix a bug in the unlitter If we see a birdtrack while we are
 in latex mode, then we stay in latex mode - don't change into bird mode!

---
 Distribution/Simple/PreProcess/Unlit.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Distribution/Simple/PreProcess/Unlit.hs b/Distribution/Simple/PreProcess/Unlit.hs
index 77d7370f48..cc88575616 100644
--- a/Distribution/Simple/PreProcess/Unlit.hs
+++ b/Distribution/Simple/PreProcess/Unlit.hs
@@ -119,7 +119,7 @@ reclassify = blank -- begin in blank state
     latex []               = []
     latex (EndCode    :ls) = Blank "" : comment ls
     latex (BeginCode  :_ ) = [Error "\\begin{code} in code section"]
-    latex (BirdTrack l:ls) = Ordinary ('>':l) : bird ls
+    latex (BirdTrack l:ls) = Ordinary ('>':l) : latex ls
     latex (          l:ls) = l : latex ls
 
     blank []               = []
-- 
GitLab