Don't look for template files remotely for remote input.

Previously pandoc would look for the template at a remote
URL when a URL was used for the input file, instead of taking
it from the data-dir.

Closes #5579.

1 files changed, 10 insertions, 1 deletions

diff --git a/src/Text/Pandoc/App/OutputSettings.hs b/src/Text/Pandoc/App/OutputSettings.hs
index 343287a4b..837636503 100644
--- a/src/Text/Pandoc/App/OutputSettings.hs
+++ b/src/Text/Pandoc/App/OutputSettings.hs
@@ -165,7 +165,16 @@ optToOutputSettings opts = do
                                    "" -> tp <.> format
                                    _  -> tp
                     Just . UTF8.toString <$>
-                          ((fst <$> fetchItem tp') `catchError`
+                          ((do surl <- stSourceURL <$> getCommonState
+                               -- we don't want to look for templates remotely
+                               -- unless the full URL is specified:
+                               modifyCommonState $ \st -> st{
+                                  stSourceURL = Nothing }
+                               (bs, _) <- fetchItem tp'
+                               modifyCommonState $ \st -> st{
+                                  stSourceURL = surl }
+                               return bs)
+                           `catchError`
                            (\e ->
                                case e of
                                     PandocResourceNotFound _ ->