Really, if you evaluate Style["/", Underlined] or type / and set the font of the character to be underlined through Format|Font..., you get $/$, not $\underline{/}$.
What I want to do is to underline a hyperlink, but...

the output is ugly. Note, that line has a gap before ".com".
This is not the problem of 'Courier New' only. I think this behavior caused because /, //, ., etc. are operators.
$\begingroup$ $\endgroup$
Add a comment |
1 Answer
$\begingroup$ $\endgroup$
2 You can use UnderBar instead of Style[...,Underlined]:
Hyperlink[UnderBar[#], #] &@ "http://www.wolfram.com/Sine.html" 
Note: The issue you observe is mentioned in the docs Underlined >> Possible Issues:
Underlined will recursively affect all elements of an expression
- $\begingroup$ Thank you. I couldn't guess to use under-bar operator, instead I sticked to text formatting. $\endgroup$Dan Oak– Dan Oak2015-04-23 12:20:46 +00:00Commented Apr 23, 2015 at 12:20
- $\begingroup$ @Danylo, my pleasure. Thank you for the accept. $\endgroup$kglr– kglr2015-04-23 12:21:30 +00:00Commented Apr 23, 2015 at 12:21