Add Muse writer

README.md

@@ -26,7 +26,7 @@ write plain text, [Markdown], [CommonMark], [PHP Markdown Extra],
 [DocBook], [OpenDocument], [ODT], [Word docx], [GNU Texinfo], [MediaWiki
 markup], [DokuWiki markup], [ZimWiki markup], [Haddock markup],
 [EPUB] \(v2 or v3\), [FictionBook2], [Textile], [groff man] pages,
-[Emacs Org mode], [AsciiDoc], [InDesign ICML], [TEI Simple], and [Slidy],
+[Emacs Org mode], [AsciiDoc], [InDesign ICML], [TEI Simple], [Muse], and [Slidy],
 [Slideous], [DZSlides], [reveal.js] or [S5] HTML slide shows. It can also
 produce [PDF] output on systems where LaTeX, ConTeXt, or `wkhtmltopdf` is
 installed.
@@ -97,6 +97,7 @@ Markdown can be expected to be lossy.
 [FictionBook2]: http://www.fictionbook.org/index.php/Eng:XML_Schema_Fictionbook_2.1
 [InDesign ICML]: https://www.adobe.com/content/dam/Adobe/en/devnet/indesign/cs55-docs/IDML/idml-specification.pdf
 [TEI Simple]: https://github.com/TEIC/TEI-Simple
+[Muse]: https://amusewiki.org/library/manual
 
 
 

data/templates/default.muse

@@ -0,0 +1,44 @@
+$if(author)$
+#author $author$
+$endif$
+$if(title)$
+#title $title$
+$endif$
+$if(lang)$
+#lang $lang$
+$endif$
+$if(LISTtitle)$
+#LISTtitle $LISTtitle$
+$endif$
+$if(subtitle)$
+#subtitle $subtitle$
+$endif$
+$if(SORTauthors)$
+#SORTauthors $SORTauthors$
+$endif$
+$if(SORTtopics)$
+#SORTtopics $SORTtopics$
+$endif$
+$if(date)$
+#date $date$
+$endif$
+$if(notes)$
+#notes $notes$
+$endif$
+$if(source)$
+#source $source$
+$endif$
+
+$for(header-includes)$
+$header-includes$
+
+$endfor$
+$for(include-before)$
+$include-before$
+
+$endfor$
+$body$
+$for(include-after)$
+
+$include-after$
+$endfor$

deb/control.in

@@ -16,5 +16,5 @@ Description: general markup converter
  Docbook, OPML, OpenDocument, ODT, Word docx, RTF, MediaWiki,
  DokuWiki, Textile, groff man pages, plain text, Emacs Org-Mode,
  AsciiDoc, Haddock markup, EPUB (v2 and v3), FictionBook2,
- InDesign ICML, and several kinds of HTML/javascript
+ InDesign ICML, Muse, and several kinds of HTML/javascript
  slide shows (S5, Slidy, Slideous, DZSlides, reveal.js).

pandoc.cabal

@@ -24,7 +24,7 @@ Description:     Pandoc is a Haskell library for converting from one markup
                  Word docx, RTF, MediaWiki, DokuWiki, ZimWiki, Textile,
                  groff man pages, plain text, Emacs Org-Mode, AsciiDoc,
                  Haddock markup, EPUB (v2 and v3), FictionBook2, InDesign ICML,
-                 and several kinds of HTML/javascript slide shows (S5, Slidy,
+                 Muse, and several kinds of HTML/javascript slide shows (S5, Slidy,
                  Slideous, DZSlides, reveal.js).
                  .
                  In contrast to most existing tools for converting Markdown
@@ -50,6 +50,7 @@ Data-Files:
                  data/templates/default.texinfo
                  data/templates/default.man
                  data/templates/default.markdown
+                 data/templates/default.muse
                  data/templates/default.commonmark
                  data/templates/default.rst
                  data/templates/default.plain
@@ -169,6 +170,7 @@ Extra-Source-Files:
                  test/tables.rtf
                  test/tables.txt
                  test/tables.fb2
+                 test/tables.muse
                  test/testsuite.txt
                  test/writer.latex
                  test/writer.context
@@ -194,6 +196,7 @@ Extra-Source-Files:
                  test/writer.opml
                  test/writer.dokuwiki
                  test/writer.zimwiki
+                 test/writer.muse
                  test/writers-lang-and-dir.latex
                  test/writers-lang-and-dir.context
                  test/dokuwiki_inline_formatting.dokuwiki
@@ -389,6 +392,7 @@ Library
                    Text.Pandoc.Writers.EPUB,
                    Text.Pandoc.Writers.FB2,
                    Text.Pandoc.Writers.TEI,
+                   Text.Pandoc.Writers.Muse,
                    Text.Pandoc.Writers.Math,
                    Text.Pandoc.Writers.Shared,
                    Text.Pandoc.PDF,
@@ -540,6 +544,7 @@ Test-Suite test-pandoc
                   Tests.Writers.Docx
                   Tests.Writers.RST
                   Tests.Writers.TEI
+                  Tests.Writers.Muse
   Ghc-Options:  -rtsopts -Wall -fno-warn-unused-do-bind -threaded
   Default-Language: Haskell98
 

src/Text/Pandoc.hs

@@ -136,6 +136,7 @@ module Text.Pandoc
                , writeCommonMark
                , writeCustom
                , writeTEI
+               , writeMuse
                -- * Rendering templates and default templates
                , module Text.Pandoc.Templates
                -- * Miscellaneous
@@ -191,6 +192,7 @@ import Text.Pandoc.Writers.LaTeX
 import Text.Pandoc.Writers.Man
 import Text.Pandoc.Writers.Markdown
 import Text.Pandoc.Writers.MediaWiki
+import Text.Pandoc.Writers.Muse
 import Text.Pandoc.Writers.Native
 import Text.Pandoc.Writers.ODT
 import Text.Pandoc.Writers.OpenDocument
@@ -307,6 +309,7 @@ writers = [
   ,("haddock"      , StringWriter writeHaddock)
   ,("commonmark"   , StringWriter writeCommonMark)
   ,("tei"          , StringWriter writeTEI)
+  ,("muse"         , StringWriter writeMuse)
   ]
 
 getDefaultExtensions :: String -> Extensions