Fixed regression in example lists.

This was associated with e1be934dc2.
2013-01-09 15:54:39 -08:00 · 2013-01-09 15:54:39 -08:00 · 0998f774ce
commit 0998f774ce
parent d599c4cdab
1 changed files with 7 additions and 6 deletions
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@ -369,7 +369,8 @@ blockToLaTeX (OrderedList (start, numstyle, numdelim) lst) = do
                       LowerRoman   -> "\\roman" <> braces x
                       UpperAlpha   -> "\\Alph" <> braces x
                       LowerAlpha   -> "\\alph" <> braces x
-                       _           -> x
+                       Example      -> "\\arabic" <> braces x
+                       DefaultStyle -> "\\arabic" <> braces x
  let todelim x = case numdelim of
                       OneParen    -> x <> ")"
                       TwoParens   -> parens x