@@ -58,6 +58,7 @@ module Text.Pandoc.Shared (
5858 compactify,
5959 generateReference,
6060 WriterOptions (..),
61+ defaultWriterOptions,
6162 KeyTable,
6263 keyTable,
6364 lookupKeySrc,
@@ -349,6 +350,20 @@ data WriterOptions = WriterOptions
349350 , writerNotes :: [Block] -- ^ List of note blocks
350351 } deriving Show
351352
353+-- | Default writer options.
354+defaultWriterOptions =
355+ WriterOptions { writerStandalone = True,
356+ writerHeader = "",
357+ writerTitlePrefix = "",
358+ writerTabStop = 4,
359+ writerNotes = [],
360+ writerS5 = False,
361+ writerIncremental = False,
362+ writerNumberSections = False,
363+ writerIncludeBefore = "",
364+ writerIncludeAfter = "",
365+ writerStrictMarkdown = False }
366+
352367--
353368-- Functions for constructing lists of reference keys
354369--