All pastes #3251598 Raw Edit

Stuff

public unlisted text v1 · immutable
#3251598 ·published 2015-11-13 21:53 UTC
rendered paste body
--- Viewuser.pm	2015-11-14 00:51:41.884461781 +0300
+++ Viewuser-new.pm	2015-11-14 00:52:06.774648581 +0300
@@ -198,29 +198,33 @@
     my $andfull = $opts->{'full'} ? "&mode=full" : "";                                                     
     my $img = $opts->{'imgroot'} || $LJ::IMGPREFIX;                                                            
     my $strike = $opts->{'del'} ? ' text-decoration: line-through;' : '';                                      
+    my $user_name = $user;
+    if (length($user_name) > 30) {
+	$user_name = substr($user_name, 0, 30).'...';
+    }
     my $make_tag = sub {                                                                                       
         my ($s, $n, $fil, $dir) = @_;                                                                          
 	$n = lc ($n);
 
 	    if ($n eq ""){
-                return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/userinfo.bml?user=$user$andfull'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user</b></a></span>";
+                return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/userinfo.bml?user=$user$andfull'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user_name</b></a></span><wbr>";
 	    } else { 
 		if ($lj_type eq 'Y') {
 
 # If the site is known and has an lj-type engine, then we now how to
 # refer to userinfo; make the info icon link to this
 	
-	    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/userinfo.bml?user=$user$andfull'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user\@$n</b></a></span>";
+	    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/userinfo.bml?user=$user$andfull'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user_name\@$n</b></a></span><wbr>";
 		} elsif ($known) {
 
 # If not lj-type, but known, let the info icon link to the user journal
 
-		    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/$dir$user/'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user\@$n</b></a></span>";
+		    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/$dir$user/'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user_name\@$n</b></a></span><wbr>";
 		} else {
 
 # Unknown site. Treat as openid
 
-		    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/$dir$user/'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user</b> [$n]</a></span>";
+		    return "<span class='ljruser' style='white-space: nowrap;$strike'><a href='http://$s/$dir$user/'><img src='$img/$fil' alt='[info]' style='vertical-align: bottom; border: 0;' /></a><a href='http://$s/$dir$user/'><b>$user_name</b> [$n]</a></span><wbr>";
                 }
 	    }
         };