Merge remote branch 'blipvert/fixes'

master
Joey Hess 2010-11-28 13:35:52 -04:00
commit 93d77673e4
1 changed files with 1 additions and 1 deletions

View File

@ -1201,7 +1201,7 @@ sub userpage ($) {
sub openiduser ($) { sub openiduser ($) {
my $user=shift; my $user=shift;
if ($user =~ m!^https?://! && if (defined $user && $user =~ m!^https?://! &&
eval q{use Net::OpenID::VerifiedIdentity; 1} && !$@) { eval q{use Net::OpenID::VerifiedIdentity; 1} && !$@) {
my $display; my $display;