@@ -91,8 +91,9 @@ optToOutputSettings opts = do
9191 return (formatFromFilePaths "html" [outputFile], Nothing)
9292 Just f -> return (f, Nothing)
9393
94− let format = map toLower $ baseWriterName
95− $ takeFileName writerName -- in case path to lua script
94+ let format = if ".lua" `isSuffixOf` writerName
95+ then writerName
96+ else map toLower $ baseWriterName writerName
9697
9798 (writer, writerExts) <-
9899 if ".lua" `isSuffixOf` format