Don't peform a DNS lookup if the base is overridden

schwern · Feb 21, 2011 · 425919e · 425919e
1 parent 1a204a0
commit 425919e
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/lib/Libravatar/URL.pm b/lib/Libravatar/URL.pm
@@ -126,12 +126,12 @@ sub federated_url {
 sub libravatar_url {
     my %args = @_;
 
-    my $federated_url = federated_url($args{email});
-    if ( $federated_url ) {
-        $defaults{base} = $federated_url;
-    }
-    else {
-        $defaults{base} = $Libravatar_Base;
+    $defaults{base} = $Libravatar_Base;
+    if ( !$args{base} ) {
+        my $federated_url = federated_url($args{email});
+        if ( $federated_url ) {
+            $defaults{base} = $federated_url;
+        }
     }
 
     Gravatar::URL::_apply_defaults(\%args, \%defaults);