diff options
| author | ache <ache@FreeBSD.org> | 2003-04-29 23:07:46 +0800 |
|---|---|---|
| committer | ache <ache@FreeBSD.org> | 2003-04-29 23:07:46 +0800 |
| commit | 0785b09dbc516ae88bda8962bb1caa0d5dec67ef (patch) | |
| tree | 77925ff2e8d2d0b511816e57ae79e661797fa6f4 /net/p5-Net-XWhois | |
| parent | 815a6916d6a0e226f2eec2b5f95528855da974d5 (diff) | |
| download | freebsd-ports-gnome-0785b09dbc516ae88bda8962bb1caa0d5dec67ef.tar.gz freebsd-ports-gnome-0785b09dbc516ae88bda8962bb1caa0d5dec67ef.tar.zst freebsd-ports-gnome-0785b09dbc516ae88bda8962bb1caa0d5dec67ef.zip | |
Domain cache code not works - $domain was not set
Diffstat (limited to 'net/p5-Net-XWhois')
| -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: { |