@@ -283,7 +283,7 @@ inlineToConTeXt (Link txt (src, _)) = do
283 put $ st {stNextRef = next + 1}
283 put $ st {stNextRef = next + 1}
284 let ref = show next
284 let ref = show next
285 label <- inlineListToConTeXt txt
285 label <- inlineListToConTeXt txt
286− return $ text "\\useurl[" <> text ref <> text "][" <> text src <>
286+ return $ text "\\useURL[" <> text ref <> text "][" <> text src <>
287 text "][][" <> label <> text "]\\from[" <> text ref <> char ']'
287 text "][][" <> label <> text "]\\from[" <> text ref <> char ']'
288inlineToConTeXt (Image alternate (src, tit)) = do
288inlineToConTeXt (Image alternate (src, tit)) = do
289 alt <- inlineListToConTeXt alternate
289 alt <- inlineListToConTeXt alternate