Re-enable support for custom lua writers.

Closes #3495.

1 files changed, 3 insertions, 1 deletions

diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs
index d1047c3cf..cdc0c52fc 100644
--- a/src/Text/Pandoc/App.hs
+++ b/src/Text/Pandoc/App.hs
@@ -166,7 +166,9 @@ convertWithOpts opts = do
   -- disabling the custom writer for now
   writer <- if ".lua" `isSuffixOf` format
                -- note:  use non-lowercased version writerName
-               then error "custom writers disabled for now"
+               then return (StringWriter
+                       (\o d -> liftIO $ writeCustom writerName o d)
+                               :: Writer PandocIO)
                else case getWriter writerName of
                          Left e  -> err 9 $
                            if format == "pdf"