From a1320a76f9dad0e23118e67335206c87608e9f8f Mon Sep 17 00:00:00 2001
From: Jesse Rosenthal <jrosenthal@jhu.edu>
Date: Wed, 13 Aug 2014 00:08:01 -0400
Subject: Docx: Reducible forgot about smallcaps

---
 src/Text/Pandoc/Readers/Docx/Reducible.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Text/Pandoc/Readers/Docx')

diff --git a/src/Text/Pandoc/Readers/Docx/Reducible.hs b/src/Text/Pandoc/Readers/Docx/Reducible.hs
index 39a93d988..80a0cee17 100644
--- a/src/Text/Pandoc/Readers/Docx/Reducible.hs
+++ b/src/Text/Pandoc/Readers/Docx/Reducible.hs
@@ -138,6 +138,7 @@ instance Reducible Inline where
 
   container (Emph _) = Container Emph
   container (Strong _) = Container Strong
+  container (SmallCaps _) = Container SmallCaps
   container (Strikeout _) = Container Strikeout
   container (Subscript _) = Container Subscript
   container (Superscript _) = Container Superscript
@@ -147,6 +148,7 @@ instance Reducible Inline where
   container _ = NullContainer
 
   innards (Emph ils) = ils
+  innards (SmallCaps ils) = ils
   innards (Strong ils) = ils
   innards (Strikeout ils) = ils
   innards (Subscript ils) = ils
-- 
cgit v1.2.3