@@ -1327,6 +1327,7 @@ convertWithOpts opts args = do
1327 (doc, media) <- case reader of
1327 (doc, media) <- case reader of
1328 (StringReader _) | not fileScope && readerName' /= "json" ->
1328 (StringReader _) | not fileScope && readerName' /= "json" ->
1329 sourceToDoc sources
1329 sourceToDoc sources
1330+ _ | null sources -> sourceToDoc sources
1330 _ -> do pairs <- mapM (\s -> sourceToDoc [s]) sources
1331 _ -> do pairs <- mapM (\s -> sourceToDoc [s]) sources
1331 return (mconcat $ map fst pairs, mconcat $ map snd pairs)
1332 return (mconcat $ map fst pairs, mconcat $ map snd pairs)