Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Added --epub-subdirectory option.

Browse source 
This specifies the subdirectory in the OCF container that
holds the EPUB specific content.

Closes #3720.
This commit is contained in:
John MacFarlane 2017-06-22 12:01:33 +02:00
parent 379b99f63a
commit 24d215acf5
2 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
MANUAL.txt
View file

@ -977,6 +977,12 @@ Options affecting specific writers
documents with few level 1 headers, one might want to use a chapter documents with few level 1 headers, one might want to use a chapter
level of 2 or 3. level of 2 or 3.
`--epub-subdirectory=`*DIRNAME*
: Specify the subdirectory in the OCF container that is to hold
the EPUB-specific contents. The default is `EPUB`. To put
the EPUB contents in the top level, use an empty string.
`--latex-engine=pdflatex`|`lualatex`|`xelatex` `--latex-engine=pdflatex`|`lualatex`|`xelatex`
: Use the specified LaTeX engine when producing PDF output. : Use the specified LaTeX engine when producing PDF output.

10
src/Text/Pandoc/App.hs
View file

@ -355,6 +355,7 @@ convertWithOpts opts = do
writerSlideLevel = optSlideLevel opts, writerSlideLevel = optSlideLevel opts,
writerHighlightStyle = highlightStyle, writerHighlightStyle = highlightStyle,
writerSetextHeaders = optSetextHeaders opts, writerSetextHeaders = optSetextHeaders opts,
writerEpubSubdirectory = optEpubSubdirectory opts,
writerEpubMetadata = epubMetadata, writerEpubMetadata = epubMetadata,
writerEpubFonts = optEpubFonts opts, writerEpubFonts = optEpubFonts opts,
writerEpubChapterLevel = optEpubChapterLevel opts, writerEpubChapterLevel = optEpubChapterLevel opts,
@ -553,6 +554,7 @@ data Opt = Opt
, optHTMLMathMethod :: HTMLMathMethod -- ^ Method to print HTML math , optHTMLMathMethod :: HTMLMathMethod -- ^ Method to print HTML math
, optAbbreviations :: Maybe FilePath -- ^ Path to abbrevs file , optAbbreviations :: Maybe FilePath -- ^ Path to abbrevs file
, optReferenceDoc :: Maybe FilePath -- ^ Path of reference doc , optReferenceDoc :: Maybe FilePath -- ^ Path of reference doc
, optEpubSubdirectory :: String -- ^ EPUB subdir in OCF container
, optEpubMetadata :: Maybe FilePath -- ^ EPUB metadata , optEpubMetadata :: Maybe FilePath -- ^ EPUB metadata
, optEpubFonts :: [FilePath] -- ^ EPUB fonts to embed , optEpubFonts :: [FilePath] -- ^ EPUB fonts to embed
, optEpubChapterLevel :: Int -- ^ Header level at which to split chapters , optEpubChapterLevel :: Int -- ^ Header level at which to split chapters
@ -628,6 +630,7 @@ defaultOpts = Opt
, optHTMLMathMethod = PlainMath , optHTMLMathMethod = PlainMath
, optAbbreviations = Nothing , optAbbreviations = Nothing
, optReferenceDoc = Nothing , optReferenceDoc = Nothing
, optEpubSubdirectory = "EPUB"
, optEpubMetadata = Nothing , optEpubMetadata = Nothing
, optEpubFonts = [] , optEpubFonts = []
, optEpubChapterLevel = 1 , optEpubChapterLevel = 1
@ -1243,6 +1246,13 @@ options =
"FILE") "FILE")
"" -- "Path of custom reference doc" "" -- "Path of custom reference doc"
, Option "" ["epub-subdirectory"]
(ReqArg
(\arg opt ->
return opt { optEpubSubdirectory = arg })
"DIRNAME")
"" -- "Name of subdirectory for epub content in OCF container"
, Option "" ["epub-cover-image"] , Option "" ["epub-cover-image"]
(ReqArg (ReqArg
(\arg opt -> (\arg opt ->