From 100f8df43eb2dcef9ccbc02fbcca576d77467740 Mon Sep 17 00:00:00 2001
From: David Lazar <lazar6@illinois.edu>
Date: Thu, 4 Apr 2013 23:01:15 -0700
Subject: Haddock reader: derive Show for Token, making debugging easier.

---
 src/Text/Pandoc/Readers/Haddock/Lex.x | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Readers/Haddock/Lex.x b/src/Text/Pandoc/Readers/Haddock/Lex.x
index a84204e83..120e96ebf 100644
--- a/src/Text/Pandoc/Readers/Haddock/Lex.x
+++ b/src/Text/Pandoc/Readers/Haddock/Lex.x
@@ -131,7 +131,7 @@ data Token
   | TokExamplePrompt String
   | TokExampleExpression String
   | TokExampleResult String
---  deriving Show
+  deriving Show
 
 tokenPos :: LToken -> (Int, Int)
 tokenPos t = let AlexPn _ line col = snd t in (line, col)
-- 
cgit v1.2.3