@@ -310,7 +310,7 @@ toLabel z = go `fmap` stringToLaTeX URLString z
310 where go [] = ""
310 where go [] = ""
311 go (x:xs)
311 go (x:xs)
312 | (isLetter x || isDigit x) && isAscii x = x:go xs
312 | (isLetter x || isDigit x) && isAscii x = x:go xs
313− | elem x ("-+=:;." :: String) = x:go xs
313+ | elem x ("_-+=:;." :: String) = x:go xs
314 | otherwise = "ux" ++ printf "%x" (ord x) ++ go xs
314 | otherwise = "ux" ++ printf "%x" (ord x) ++ go xs
316-- | Puts contents into LaTeX command.
316-- | Puts contents into LaTeX command.