@@ -10,7 +10,8 @@ main = do
1010 rmContents <- liftM toString $ B.readFile "README"
1111 let (Pandoc meta blocks) = readMarkdown defaultParserState rmContents
1212 let newBlocks = removeWrapperSect blocks
13− manTemplate <- liftM toString $ B.readFile "manpage.template"
13+ manTemplate <- liftM toString $ B.readFile
14+ $ "man" </> "man1" </> "pandoc.1.template"
1415 let opts = defaultWriterOptions{ writerStandalone = True
1516 , writerTemplate = manTemplate }
1617 let manPage = writeMan opts $