r66325 - in /trunk/libwww-cnic-perl: debian/ lib/WWW/ lib/WWW/CNic/ lib/WWW/CNic/Response/ lib/WWW/CNic/Response/Register/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Sat Dec 25 16:18:59 UTC 2010


Author: jawnsy-guest
Date: Sat Dec 25 16:18:49 2010
New Revision: 66325

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=66325
Log:
* New upstream release
* Refresh copyright information
* Rewrite long description
* Standards-Version 3.9.1 (no changes)
* Add myself to Uploaders and Copyright

Added:
    trunk/libwww-cnic-perl/lib/WWW/CNic/NG.pm
      - copied unchanged from r66314, branches/upstream/libwww-cnic-perl/current/lib/WWW/CNic/NG.pm
Removed:
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Register/
Modified:
    trunk/libwww-cnic-perl/debian/changelog
    trunk/libwww-cnic-perl/debian/control
    trunk/libwww-cnic-perl/debian/copyright
    trunk/libwww-cnic-perl/lib/WWW/CNic.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/CreateHandle.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/DomainList.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/ListOutstandingDomains.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/PollTransfers.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Search.pm
    trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Suffixes.pm

Modified: trunk/libwww-cnic-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/debian/changelog?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/debian/changelog (original)
+++ trunk/libwww-cnic-perl/debian/changelog Sat Dec 25 16:18:49 2010
@@ -1,9 +1,17 @@
-libwww-cnic-perl (0.32-2) UNRELEASED; urgency=low
+libwww-cnic-perl (0.37-1) UNRELEASED; urgency=low
 
+  [ Jonathan Yu ]
+  * New upstream release
+  * Refresh copyright information
+  * Rewrite long description
+  * Standards-Version 3.9.1 (no changes)
+  * Add myself to Uploaders and Copyright
+
+  [ Chris Butler ]
   * Upstream are now using CPAN for distribution, updated the watch file
     accordingly.
 
- -- Chris Butler <chrisb at debian.org>  Thu, 16 Sep 2010 18:56:31 +0100
+ -- Jonathan Yu <jawnsy at cpan.org>  Sat, 25 Dec 2010 11:34:59 -0500
 
 libwww-cnic-perl (0.32-1) unstable; urgency=low
 

Modified: trunk/libwww-cnic-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/debian/control?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/debian/control (original)
+++ trunk/libwww-cnic-perl/debian/control Sat Dec 25 16:18:49 2010
@@ -1,26 +1,24 @@
 Source: libwww-cnic-perl
+Priority: optional
+Section: perl
+Build-Depends: debhelper (>= 7)
+Build-Depends-Indep: perl, libwww-perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
 Uploaders: Jonathan McDowell <noodles at earth.li>,
- Nathan Handler <nhandler at ubuntu.com>,
+ Nathan Handler <nhandler at ubuntu.com>, Jonathan Yu <jawnsy at cpan.org>,
  Chris Butler <chrisb at debian.org>,
  gregor herrmann <gregoa at debian.org>
-Priority: optional
-Section: perl
-Standards-Version: 3.8.4
+Standards-Version: 3.9.1
+Homepage: http://toolkit.centralnic.com/downloads
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libwww-cnic-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libwww-cnic-perl/
-Homepage: http://toolkit.centralnic.com/downloads
-Build-Depends-Indep: libwww-perl, perl
-Build-Depends: debhelper (>= 7)
 
 Package: libwww-cnic-perl
 Architecture: all
 Depends: ${misc:Depends}, ${perl:Depends}, libwww-perl
 Recommends: libcrypt-ssleay-perl
-Description: CentralNic Perl toolkit
- The CentralNic Toolkit is CentralNic's system for instantaneous
- Registry-Registrar Communications. Registrars can use this system to register
- and modify CentralNic domain names in real time, with no delays for human
- intervention or e-mail processing. The Toolkit also provides advanced and
- efficient methods for searching for and querying domain names and whois
- records, and retrieving account information.
+Description: interface to the CentralNic domain registry system
+ WWW::CNic provides an object-oriented Perl interface to the CentralNic
+ Toolkit system, which allows registrars to manipulate CentralNic domain
+ names. The Toolkit also provides methods for searching for and querying
+ domain names and whois records, and retrieving account information.

Modified: trunk/libwww-cnic-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/debian/copyright?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/debian/copyright (original)
+++ trunk/libwww-cnic-perl/debian/copyright Sat Dec 25 16:18:49 2010
@@ -4,14 +4,17 @@
 Name: WWW-CNic
 
 Files: *
-Copyright: 2010, CentralNic Ltd.
+Copyright: 2010, CentralNic Ltd. <http://centralnic.com/>
 License: Artistic or GPL-1+
+X-Comment: this package is licensed under the "same terms as Perl";
+ see: <URL:http://toolkit.centralnic.com/downloads/>
 
 Files: debian/*
-Copyright: 2004-2008, Jonathan McDowell <noodles at earth.li>
+Copyright: 2010, Chris Butler <chrisb at debian.org>
+ 2010, Jonathan Yu <jawnsy at cpan.org>
+ 2010, gregor herrmann <gregoa at debian.org>
  2009, Nathan Handler <nhandler at ubuntu.com>
- 2010, Chris Butler <chrisb at debian.org>
- 2010, gregor herrmann <gregoa at debian.org>
+ 2004-2008, Jonathan McDowell <noodles at earth.li>
 License: Artistic or GPL-1+
 X-Comment: It is assumed that package maintainers have licensed their work
  under terms compatible with upstream licensing terms.
@@ -20,8 +23,8 @@
  This program is free software; you can redistribute it and/or modify
  it under the terms of the Artistic License, which comes with Perl.
  .
- On Debian GNU/Linux systems, the complete text of the Artistic License
- can be found in `/usr/share/common-licenses/Artistic'
+ On Debian systems, the complete text of the Artistic License can be
+ found in `/usr/share/common-licenses/Artistic'.
 
 License: GPL-1+
  This program is free software; you can redistribute it and/or modify
@@ -29,5 +32,5 @@
  the Free Software Foundation; either version 1, or (at your option)
  any later version.
  .
- On Debian GNU/Linux systems, the complete text of the GNU General
- Public License can be found in `/usr/share/common-licenses/GPL'
+ On Debian systems, the complete text of version 1 of the GNU General
+ Public License can be found in `/usr/share/common-licenses/GPL-1'.

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: CNic.pm,v 1.62 2010/05/21 16:36:47 gavin Exp $
+# $Id: CNic.pm,v 1.67 2010/06/15 16:03:57 gavin Exp $
 package WWW::CNic;
 use LWP;
 use LWP::ConnCache;
@@ -11,7 +11,7 @@
 use vars qw($VERSION $CONNECTION_CACHE);
 use strict;
 
-our $VERSION = '0.32';
+our $VERSION = '0.36';
 
 =pod
 
@@ -206,7 +206,6 @@
 		$self->{_command} eq 'handle_info'		&& return $self->_handle_info();
 		$self->{_command} eq 'register'			&& return $self->_register();
 		$self->{_command} eq 'register_idn'		&& return $self->_register(idn => 1);
-		$self->{_command} eq 'register_atgb'		&& return $self->_register_atgb();
 		$self->{_command} eq 'modify'			&& return $self->_modify();
 		$self->{_command} eq 'modify_handle'		&& return $self->_modify_handle();
 		$self->{_command} eq 'renewals'			&& return $self->_upcoming_renewals();
@@ -395,38 +394,6 @@
 	return WWW::CNic::Response::Register->new($self->{_response}->{_raw});
 }
 
-sub _register_atgb {
-	my $self = shift;
-	$self->{_base} =~ s/^http:/https:/g;	# Requires SSL
-	die("Missing domain name") if $self->{_domain} eq '';
-	die("Missing username") if $self->{_username} eq '';
-	die("Missing password") if $self->{_password} eq '';
-	my ($fname, $sname, $suffix) = split(/\./, $self->{_domain}, 3);
-	my %params = 	(
-				user		=> $self->{_username},
-				password	=> $self->_crypt_md5($self->{_password}),
-				test		=> $self->{_test},
-				fname		=> $fname,
-				sname		=> $sname,
-				suffix		=> $suffix,
-				registrant	=> $self->{_params}->{registrant},
-				handle		=> $self->_build_handle_string($self->{_params}->{handle}),
-				user_password	=> $self->{_params}->{user_password},
-				send_email	=> $self->{_params}->{send_email}
-			);
-	my $req = HTTP::Request->new(POST => "$self->{_base}/register_atgb");
-	$req->content_type('application/x-www-form-urlencoded');
-	my @content;
-	foreach my $name(keys %params) {
-		my $pair = uri_escape($name).'='.uri_escape($params{$name});
-		push(@content, $pair);
-	}
-	$req->content(join('&', @content));
-	$self->{_response}->{_raw} = $self->_get($req);
-	use WWW::CNic::Response::Register::AtGB;
-	return WWW::CNic::Response::Register::AtGB->new($self->{_response}->{_raw});
-}
-
 sub _modify {
 	my $self = shift;
 	$self->{_base} =~ s/^http:/https:/g;	# Requires SSL

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/CreateHandle.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/CreateHandle.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/CreateHandle.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/CreateHandle.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: CreateHandle.pm,v 1.7 2010/03/31 11:58:31 gavin Exp $
+# $Id: CreateHandle.pm,v 1.8 2010/06/15 10:47:31 gavin Exp $
 
 package WWW::CNic::Response::CreateHandle;
 use vars qw($VERSION);
@@ -10,7 +10,7 @@
 
 =head1 NAME
 
-WWW::CNic::Response::CreateHandle - a WWW::CNic response object for creating new handles. It is advisable to create a new handle when registering multiple domains to avoid administration problems in the future.
+WWW::CNic::Response::CreateHandle - a WWW::CNic response object for creating new handles.
 
 =head1 SYNOPSIS
 

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/DomainList.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/DomainList.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/DomainList.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/DomainList.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: DomainList.pm,v 1.9 2010/03/31 11:58:31 gavin Exp $
+# $Id: DomainList.pm,v 1.10 2010/06/15 08:21:56 gavin Exp $
 
 package WWW::CNic::Response::DomainList;
 use vars qw($VERSION);
@@ -10,7 +10,7 @@
 
 =head1 NAME
 
-WWW::CNic::Response::Renewals - a WWW::CNic response object for domain lists.
+WWW::CNic::Response::DomainList - a WWW::CNic response object for domain lists.
 
 =head1 SYNOPSIS
 
@@ -89,4 +89,4 @@
 	return $stuff[0];
 }
 
-1;
+1;

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/ListOutstandingDomains.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/ListOutstandingDomains.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/ListOutstandingDomains.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/ListOutstandingDomains.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: ListOutstandingDomains.pm,v 1.2 2010/03/31 11:58:31 gavin Exp $
+# $Id: ListOutstandingDomains.pm,v 1.3 2010/06/15 08:21:56 gavin Exp $
 
 package WWW::CNic::Response::ListOutstandingDomains;
 use vars qw($VERSION);
@@ -9,6 +9,8 @@
 =pod
 
 =head1 NAME
+
+WWW::CNic::Response::ListOutstandingDomains - a WWW::CNic response object for listing outstanding domains.
 
 =head1 SYNOPSIS
 

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/PollTransfers.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/PollTransfers.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/PollTransfers.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/PollTransfers.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: PollTransfers.pm,v 1.3 2010/03/31 11:58:31 gavin Exp $
+# $Id: PollTransfers.pm,v 1.4 2010/06/15 08:21:56 gavin Exp $
 
 package WWW::CNic::Response::PollTransfers;
 use vars qw($VERSION);
@@ -9,6 +9,8 @@
 =pod
 
 =head1 NAME
+
+WWW::CNic::Response::PollTransfers - a WWW::CNic::Response object for WWW::CNic::Response.
 
 =head1 SYNOPSIS
 

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Search.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Search.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Search.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Search.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: Search.pm,v 1.12 2010/03/31 11:58:31 gavin Exp $
+# $Id: Search.pm,v 1.13 2010/06/15 08:21:56 gavin Exp $
 
 package WWW::CNic::Response::Search;
 use vars qw($VERSION);
@@ -10,7 +10,7 @@
 
 =head1 NAME
 
-WWW::CNic::Response::Register - a WWW::CNic response object for domain searching.
+WWW::CNic::Response::Search - a WWW::CNic response object for domain searching.
 
 =head1 SYNOPSIS
 

Modified: trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Suffixes.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Suffixes.pm?rev=66325&op=diff
==============================================================================
--- trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Suffixes.pm (original)
+++ trunk/libwww-cnic-perl/lib/WWW/CNic/Response/Suffixes.pm Sat Dec 25 16:18:49 2010
@@ -1,7 +1,7 @@
 # Copyright (c) 2010 CentralNic Ltd. All rights reserved. This program is
 # free software; you can redistribute it and/or modify it under the same
 # terms as Perl itself.
-# $Id: Suffixes.pm,v 1.10 2010/03/31 11:58:31 gavin Exp $
+# $Id: Suffixes.pm,v 1.11 2010/06/15 08:21:56 gavin Exp $
 
 package WWW::CNic::Response::Suffixes;
 use vars qw($VERSION);
@@ -10,7 +10,7 @@
 
 =head1 NAME
 
-WWW::CNic::Response::Register - a WWW::CNic response object for suffix list lookup.
+WWW::CNic::Response::Suffixes - a WWW::CNic response object for suffix list lookup.
 
 =head1 SYNOPSIS
 
@@ -59,4 +59,4 @@
 
 sub suffixes { return grep { /[A-Z]{2}\.[A-Z]{3}$/i } sort(keys(%{$_[0]->{_response}})) }
 
-1;
+1;




More information about the Pkg-perl-cvs-commits mailing list