diff options
| -rw-r--r-- | net/p5-Net-XWhois/Makefile | 2 | ||||
| -rw-r--r-- | net/p5-Net-XWhois/files/patch-lib::Net::XWhois.pm | 10 |
2 files changed, 10 insertions, 2 deletions
diff --git a/net/p5-Net-XWhois/Makefile b/net/p5-Net-XWhois/Makefile index 518f08b148cc..bdb32f30e981 100644 --- a/net/p5-Net-XWhois/Makefile +++ b/net/p5-Net-XWhois/Makefile @@ -7,7 +7,7 @@ PORTNAME= Net-XWhois PORTVERSION= 0.90 -PORTREVISION= 1 +PORTREVISION= 2 CATEGORIES= net perl5 MASTER_SITES= ${MASTER_SITE_PERL_CPAN} MASTER_SITE_SUBDIR= Net diff --git a/net/p5-Net-XWhois/files/patch-lib::Net::XWhois.pm b/net/p5-Net-XWhois/files/patch-lib::Net::XWhois.pm index ac970386ccf3..aeb6d348e8ed 100644 --- a/net/p5-Net-XWhois/files/patch-lib::Net::XWhois.pm +++ b/net/p5-Net-XWhois/files/patch-lib::Net::XWhois.pm @@ -1,5 +1,5 @@ --- lib/Net/XWhois.pm.orig Sun Oct 6 05:37:55 2002 -+++ lib/Net/XWhois.pm Tue Apr 29 09:54:06 2003 ++++ lib/Net/XWhois.pm Tue Apr 29 19:01:59 2003 @@ -16,6 +16,7 @@ # # Changes: @@ -93,3 +93,11 @@ 'tn' => 'whois.ripe.net', 'tr' => 'whois.ripe.net', 'tw' => 'whois.twnic.net', 'ua' => 'whois.ripe.net', +@@ -557,6 +596,7 @@ + $self->{ Domain }=~s/^www\.//; #trim leading www. if present; internic doesn't like it + print "looking up ", $self->{ Domain }, " on ", $self->{ Server }, "\n" if ($self->{ Verbose }); + ++ my $domain = $self->{ Domain }; + #see if we already have a response in the cache, unless told not to + unless ( $self->{ Nocache } ) { + READCACHE: { |