[livejournal] r19747: LJSUP-9304: fixed additional http:// pre...

U   trunk/cgi-bin/LJ/User.pm

Modified: trunk/cgi-bin/LJ/User.pm
===================================================================
--- trunk/cgi-bin/LJ/User.pm	2011-08-17 05:59:16 UTC (rev 19746)
+++ trunk/cgi-bin/LJ/User.pm	2011-08-17 06:20:03 UTC (rev 19747)
@@ -1315,7 +1315,7 @@
     $url ||= $u->prop('url');
     return unless $url;
 
-    $url = "http://$url" unless $url =~ m!^http://!;
+    $url = "http://$url" unless $url =~ m!^https?://!;
 
     return $url;
 }
@@ -6028,7 +6028,6 @@
 
 sub set_custom_usericon {
     my ($u, $url) = @_;
-    my $uid = $u->id;
 
     $u->set_prop( 'custom_usericon' => $url );
 }