use smart punctuation

1 files changed, 6 insertions, 2 deletions

diff --git a/site.hs b/site.hs
index 9fcd0b7..7f90e8c 100644
--- a/site.hs
+++ b/site.hs
@@ -142,8 +142,12 @@ customPandocCompiler =
       (addRExt [Ext_pipe_tables] defaultHakyllReaderOptions)
       (addWExt [Ext_pipe_tables] defaultHakyllWriterOptions)
   where
-    addRExt es opts = opts { readerExtensions = S.union (S.fromList es) (readerExtensions opts) }
-    addWExt es opts = opts { writerExtensions = S.union (S.fromList es) (writerExtensions opts) }
+    addRExt es opts =
+      opts { readerExtensions = S.union (S.fromList es) (readerExtensions opts)
+           , readerSmart = True
+           }
+    addWExt es opts =
+      opts { writerExtensions = S.union (S.fromList es) (writerExtensions opts) }
 
 defaultCompiler = customPandocCompiler
   >>= loadAndApplyTemplate "templates/post.html"    postCtx