@@ -107,7 +107,7 @@ blockToMediaWiki (Para [Image txt (src,'f':'i':'g':':':tit)]) = do
107107 let opt = if null txt
108108 then ""
109109 else "|alt=" ++ if null tit then capt else tit ++ capt
110− return $ "[[Image:" ++ src ++ "|frame|none" ++ opt ++ "]]\n"
110+ return $ "[[File:" ++ src ++ "|frame|none" ++ opt ++ "]]\n"
111111
112112blockToMediaWiki (Para inlines) = do
113113 tags <- asks useTags
@@ -397,7 +397,7 @@ inlineToMediaWiki (Image alt (source, tit)) = do
397397 then ""
398398 else '|' : alt'
399399 else '|' : tit
400− return $ "[[Image:" ++ source ++ txt ++ "]]"
400+ return $ "[[File:" ++ source ++ txt ++ "]]"
401401
402402inlineToMediaWiki (Note contents) = do
403403 contents' <- blockListToMediaWiki contents