@@ -242,7 +242,10 @@ writeEPUB opts doc@(Pandoc meta _) = do
242 Nothing -> []
242 Nothing -> []
243 Just _ -> [ unode "itemref" !
243 Just _ -> [ unode "itemref" !
244 [("idref", "cover"),("linear","no")] $ () ]
244 [("idref", "cover"),("linear","no")] $ () ]
245− ++ ((unode "itemref" ! [("idref", "title_page"),("linear","yes")] $ ()) :
245+ ++ ((unode "itemref" ! [("idref", "title_page")
246+ ,("linear", case meta of
247+ Meta [] [] [] -> "no"
248+ _ -> "yes")] $ ()) :
246 (unode "itemref" ! [("idref", "nav")
249 (unode "itemref" ! [("idref", "nav")
247 ,("linear", if writerTableOfContents opts
250 ,("linear", if writerTableOfContents opts
248 then "yes"
251 then "yes"