@@ -201,7 +201,7 @@ stringToLaTeX ctx (x:xs) = do
201 '_' | not isUrl -> "\\_" ++ rest
201 '_' | not isUrl -> "\\_" ++ rest
202 '#' -> "\\#" ++ rest
202 '#' -> "\\#" ++ rest
203 '-' -> case xs of -- prevent adjacent hyphens from forming ligatures
203 '-' -> case xs of -- prevent adjacent hyphens from forming ligatures
204− ('-':_) -> "-{}" ++ rest
204+ ('-':_) -> "-\\/" ++ rest
205 _ -> '-' : rest
205 _ -> '-' : rest
206 '~' | not isUrl -> "\\textasciitilde{}" ++ rest
206 '~' | not isUrl -> "\\textasciitilde{}" ++ rest
207 '^' -> "\\^{}" ++ rest
207 '^' -> "\\^{}" ++ rest