@@ -284,20 +284,20 @@ options =
284284 , Option "" ["mimetex"]
285285 (OptArg
286286 (\arg opt -> do
287− let url = case arg of
287+ let url' = case arg of
288288 Just u -> u ++ "?"
289289 Nothing -> "/cgi-bin/mimetex.cgi?"
290− return opt { optHTMLMathMethod = WebTeX url })
290+ return opt { optHTMLMathMethod = WebTeX url' })
291291 "URL")
292292 "" -- "Use mimetex for HTML math"
293293
294294 , Option "" ["webtex"]
295295 (OptArg
296296 (\arg opt -> do
297− let url = case arg of
297+ let url' = case arg of
298298 Just u -> u
299299 Nothing -> "http://chart.apis.google.com/chart?cht=tx&chl="
300− return opt { optHTMLMathMethod = WebTeX url })
300+ return opt { optHTMLMathMethod = WebTeX url' })
301301 "URL")
302302 "" -- "Use web service for HTML math"
303303