@@ -930,6 +930,9 @@ defaultReaderName fallback (x:xs) =
930930 ".docx" -> "docx"
931931 ".t2t" -> "t2t"
932932 ".epub" -> "epub"
933+ ".odt" -> "odt" -- so we get an "unknown reader" error
934+ ".pdf" -> "pdf" -- so we get an "unknown reader" error
935+ ".doc" -> "doc" -- so we get an "unknown reader" error
933936 _ -> defaultReaderName fallback xs
934937
935938-- Returns True if extension of first source is .lhs
@@ -1148,7 +1151,15 @@ main = do
11481151 (getT2TMeta sources outputFile)
11491152 else case getReader readerName' of
11501153 Right r -> return r
1151− Left e -> err 7 e
1154+ Left e -> err 7 e'
1155+ where e' = case readerName' of
1156+ "odt" -> e ++
1157+ "\nPandoc can convert to ODT, but not from ODT.\nTry using LibreOffice to export as HTML, and convert that with pandoc."
1158+ "pdf" -> e ++
1159+ "\nPandoc can convert to PDF, but not from PDF."
1160+ "doc" -> e ++
1161+ "\nPandoc can convert from DOCX, but not from DOC.\nTry using Word to save your DOC file as DOCX, and convert that with pandoc."
1162+ _ -> e
11521163
11531164 let standalone' = standalone || not (isTextFormat writerName') || pdfOutput
11541165