diff --git a/src/Text/Pandoc/Writers/Powerpoint.hs b/src/Text/Pandoc/Writers/Powerpoint.hs index f7d5bbc5f..d78833c81 100644 --- a/src/Text/Pandoc/Writers/Powerpoint.hs +++ b/src/Text/Pandoc/Writers/Powerpoint.hs @@ -1658,8 +1658,6 @@ getContentType fp | "ppt" : "theme" : f : [] <- splitDirectories fp , (_, ".xml") <- splitExtension f = Just $ noPresML ++ ".theme+xml" - -- | "ppt" : "slideLayouts" : f : [] <- splitDirectories fp - -- , (_, ".xml") <- splitExtension f = | "ppt" : "slideLayouts" : _ : [] <- splitDirectories fp= Just $ presML ++ ".slideLayout+xml" | otherwise = Nothing