Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Merge branch 'release/Net-Whois-RIPE-2.004002'

  • Loading branch information...
commit 7cfa8ef016123fe6c1ff97230759d9ef023dd5b1 2 parents 38761ec + d35f06e
@arhuman authored
View
4 Changes
@@ -1,5 +1,9 @@
Revision history for net-whois-ripe
+2.004002 2013-07-31
+ - Add 'abuse_c' to AutNum object
+ (https://www.ripe.net/ripe/docs/ripe-563)
+
2.004001 2013-06-19
- Remove Test::Exception requirement
- Add one test
View
4 lib/Net/Whois/Object/AutNum.pm
@@ -34,8 +34,8 @@ use base qw/Net::Whois::Object/;
__PACKAGE__->attributes( 'primary', ['aut_num'] );
__PACKAGE__->attributes( 'mandatory', [ 'aut_num', 'as_name', 'descr', 'tech_c', 'admin_c', 'mnt_by', 'changed', 'source' ] );
-__PACKAGE__->attributes( 'optional', [ 'member_of', 'import', 'mp_import', 'export', 'mp_export', 'default', 'mp_default', 'remarks', 'org', 'notify', 'mnt_lower', 'mnt_routes' ] );
-__PACKAGE__->attributes( 'single', [ 'aut_num', 'as_name', 'org', 'source' ] );
+__PACKAGE__->attributes( 'optional', [ 'member_of', 'import', 'mp_import', 'export', 'mp_export', 'default', 'mp_default', 'remarks', 'org', 'notify', 'mnt_lower', 'mnt_routes', 'abuse_c' ] );
+__PACKAGE__->attributes( 'single', [ 'aut_num', 'as_name', 'org', 'source', 'abuse_c' ] );
__PACKAGE__->attributes( 'multiple', [ 'descr', 'member_of', 'import', 'mp_import', 'export', 'mp_export', 'default', 'mp_default', 'remarks', 'admin_c', 'tech_c', 'notify', 'mnt_lower', 'mnt_routes', 'mnt_by', 'changed' ] );
View
4 lib/Net/Whois/RIPE.pm
@@ -28,11 +28,11 @@ Net::Whois::RIPE - a pure-Perl implementation of the RIPE Database client.
=head1 VERSION
-Version 2.004001
+Version 2.004002
=cut
-our $VERSION = 2.004001;
+our $VERSION = 2.004002;
=head1 SYNOPSIS
View
6 t/110-AutNum.t
@@ -65,6 +65,11 @@ is_deeply( $object->tech_c(), ['NC345-RIPE'], 'tech_c properly parsed' );
$object->tech_c('Added tech_c');
is( $object->tech_c()->[1], 'Added tech_c', 'tech_c properly added' );
+# Test 'abuse_c'
+$tested{'abuse_c'}++;
+is_deeply( $object->abuse_c(), 'NC789-RIPE', 'abuse_c properly parsed' );
+
+is( $object->tech_c()->[1], 'Added tech_c', 'tech_c properly added' );
# Test 'mnt_by'
$tested{'mnt_by'}++;
is_deeply( $object->mnt_by(), [ 'RIPE-NCC-END-MNT', 'MAIN-FR-MNT' ], 'mnt_by properly parsed' );
@@ -148,6 +153,7 @@ descr: FRANCE
org: ORG-MISC01-RIPE
admin-c: NC123-RIPE
tech-c: NC345-RIPE
+abuse-c: NC789-RIPE
mnt-by: RIPE-NCC-END-MNT
mnt-by: MAIN-FR-MNT
notify: MAIN-FR-MNT
Please sign in to comment.
Something went wrong with that request. Please try again.