X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/d4b44755215a40dd163753719e539bf84124587d..77356e851352d763542e0cb65c19edc5edafdccb:/IkiWiki/CGI.pm

diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm
index b031aef56..d29151ace 100644
--- a/IkiWiki/CGI.pm
+++ b/IkiWiki/CGI.pm
@@ -654,7 +654,12 @@ sub userlink ($) { #{{{
 	    eval q{use Net::OpenID::VerifiedIdentity; 1} && !$@) {
 		# Munge user-urls, as used by eg, OpenID.
 		my $oid=Net::OpenID::VerifiedIdentity->new(identity => $user);
-		return "<a href=\"$user\">".escapeHTML($oid->display)."</a>";
+		my $display=$oid->display;
+		# Convert "user.somehost.com" to "user [somehost.com]".
+		if ($display !~ /\[/) {
+			$display=~s/^(.*?)\.([^.]+\.[a-z]+)$/$1 [$2]/;
+		}
+		return "<a href=\"$user\">".escapeHTML($display)."</a>";
 	}
 	else {
 		return htmllink("", "", escapeHTML($user), 1);