diff options
Diffstat (limited to 'net/p5-Net-XWhois/files/patch-examples__whois')
| -rw-r--r-- | net/p5-Net-XWhois/files/patch-examples__whois | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/net/p5-Net-XWhois/files/patch-examples__whois b/net/p5-Net-XWhois/files/patch-examples__whois new file mode 100644 index 000000000000..5c88382ef704 --- /dev/null +++ b/net/p5-Net-XWhois/files/patch-examples__whois @@ -0,0 +1,10 @@ +--- examples/whois.bak Sun Dec 30 09:57:54 2001 ++++ examples/whois Tue Apr 29 10:02:06 2003 +@@ -8,6 +8,6 @@ + + if ( $e ) { my @emails = $whois->contact_emails; $" = ", "; print "Contacts: @emails\n"; exit } + if ( $n ) { my @emails = $whois->nameservers; $" = ", "; print "Nameservers: @emails\n"; exit } +-if ( $r ) { my @emails = $whois->registrants; $" = ", "; print "Registrants: @emails\n"; exit } ++if ( $r ) { my @emails = $whois->registrant; $" = ", "; print "Registrants: @emails\n"; exit } + print $whois->response; + |