From 427466f80c3897b8341a1e576bd488be3cea77c6 Mon Sep 17 00:00:00 2001
From: Matthew Pickering <matthewtpickering@gmail.com>
Date: Sun, 10 Aug 2014 17:04:13 +0100
Subject: Docx Fonts: Derives Show and Eq

---
 src/Text/Pandoc/Readers/Docx/Fonts.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Text/Pandoc')

diff --git a/src/Text/Pandoc/Readers/Docx/Fonts.hs b/src/Text/Pandoc/Readers/Docx/Fonts.hs
index cd56eb115..b44c71412 100644
--- a/src/Text/Pandoc/Readers/Docx/Fonts.hs
+++ b/src/Text/Pandoc/Readers/Docx/Fonts.hs
@@ -32,6 +32,7 @@ module Text.Pandoc.Readers.Docx.Fonts (getUnicode, Font(..)) where
 
 -- | Enumeration of recognised fonts
 data Font = Symbol -- ^ <http://en.wikipedia.org/wiki/Symbol_(typeface) Adobe Symbol>
+          deriving (Show, Eq)
 
 -- | Given a font and codepoint, returns the corresponding unicode
 -- character
-- 
cgit v1.2.3