[perl-www-contact commit] r47 - in trunk: . lib/WWW lib/WWW/Contact lib/WWW/Contact/CN

0 views
Skip to first unread message

codesite...@google.com

unread,
Nov 2, 2008, 10:09:34 AM11/2/08
to perl-www...@googlegroups.com
Author: sachinjsk
Date: Sun Nov 2 07:08:27 2008
New Revision: 47

Modified:
trunk/Changes
trunk/META.yml
trunk/lib/WWW/Contact.pm
trunk/lib/WWW/Contact/AOL.pm
trunk/lib/WWW/Contact/Base.pm
trunk/lib/WWW/Contact/CN/163.pm
trunk/lib/WWW/Contact/Gmail.pm
trunk/lib/WWW/Contact/Hotmail.pm
trunk/lib/WWW/Contact/Indiatimes.pm
trunk/lib/WWW/Contact/Lycos.pm
trunk/lib/WWW/Contact/Mail.pm
trunk/lib/WWW/Contact/Plaxo.pm
trunk/lib/WWW/Contact/Rediffmail.pm
trunk/lib/WWW/Contact/Yahoo.pm

Log:
preparing for release 0.16(with gmail bug fix, and rediffmail data
formating fix).

Modified: trunk/Changes
==============================================================================
--- trunk/Changes (original)
+++ trunk/Changes Sun Nov 2 07:08:27 2008
@@ -1,4 +1,8 @@
Revision history for WWW-Contact
+0.16 2008.11.02
+ Bug fix on Gmail module to handle fancy names(like R@j@n).
+ Clean up quotes(that surround name and email) when importing data
from Rediffmail.
+
0.15 2008.10.30
added WWW::Contact::Plaxo by Sachin Sebastian


Modified: trunk/META.yml
==============================================================================
--- trunk/META.yml (original)
+++ trunk/META.yml Sun Nov 2 07:08:27 2008
@@ -1,6 +1,6 @@
---
name: WWW-Contact
-version: 0.15
+version: 0.16
author:
- 'Fayland Lam <fay...@gmail.com>'
abstract: Get contacts/addressbook from Web
@@ -17,40 +17,40 @@
provides:
WWW::Contact:
file: lib/WWW/Contact.pm
- version: 0.15
+ version: 0.16
WWW::Contact::AOL:
file: lib/WWW/Contact/AOL.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Base:
file: lib/WWW/Contact/Base.pm
- version: 0.15
+ version: 0.16
WWW::Contact::CN::163:
file: lib/WWW/Contact/CN/163.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Gmail:
file: lib/WWW/Contact/Gmail.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Hotmail:
file: lib/WWW/Contact/Hotmail.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Indiatimes:
file: lib/WWW/Contact/Indiatimes.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Lycos:
file: lib/WWW/Contact/Lycos.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Mail:
file: lib/WWW/Contact/Mail.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Plaxo:
file: lib/WWW/Contact/Plaxo.pm
- version: 0.01
+ version: 0.16
WWW::Contact::Rediffmail:
file: lib/WWW/Contact/Rediffmail.pm
- version: 0.15
+ version: 0.16
WWW::Contact::Yahoo:
file: lib/WWW/Contact/Yahoo.pm
- version: 0.15
+ version: 0.16
generated_by: Module::Build version 0.2808
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.2.html

Modified: trunk/lib/WWW/Contact.pm
==============================================================================
--- trunk/lib/WWW/Contact.pm (original)
+++ trunk/lib/WWW/Contact.pm Sun Nov 2 07:08:27 2008
@@ -4,7 +4,7 @@
use Moose;
use Moose::Util::TypeConstraints;

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

has 'errstr' => ( is => 'rw', isa => 'Maybe[Str]' );

Modified: trunk/lib/WWW/Contact/AOL.pm
==============================================================================
--- trunk/lib/WWW/Contact/AOL.pm (original)
+++ trunk/lib/WWW/Contact/AOL.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

sub get_contacts {

Modified: trunk/lib/WWW/Contact/Base.pm
==============================================================================
--- trunk/lib/WWW/Contact/Base.pm (original)
+++ trunk/lib/WWW/Contact/Base.pm Sun Nov 2 07:08:27 2008
@@ -5,7 +5,7 @@
use Carp qw/croak/;
use Data::Dumper;

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

my $sub_verbose = sub {

Modified: trunk/lib/WWW/Contact/CN/163.pm
==============================================================================
--- trunk/lib/WWW/Contact/CN/163.pm (original)
+++ trunk/lib/WWW/Contact/CN/163.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

sub get_contacts {

Modified: trunk/lib/WWW/Contact/Gmail.pm
==============================================================================
--- trunk/lib/WWW/Contact/Gmail.pm (original)
+++ trunk/lib/WWW/Contact/Gmail.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

use HTML::TokeParser::Simple;

Modified: trunk/lib/WWW/Contact/Hotmail.pm
==============================================================================
--- trunk/lib/WWW/Contact/Hotmail.pm (original)
+++ trunk/lib/WWW/Contact/Hotmail.pm Sun Nov 2 07:08:27 2008
@@ -6,7 +6,7 @@
use HTTP::Request::Common qw/POST/;
use HTML::TokeParser::Simple;

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

sub get_contacts {

Modified: trunk/lib/WWW/Contact/Indiatimes.pm
==============================================================================
--- trunk/lib/WWW/Contact/Indiatimes.pm (original)
+++ trunk/lib/WWW/Contact/Indiatimes.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:SACHINJSK';

sub get_contacts {
@@ -96,7 +96,7 @@

=head1 SEE ALSO

-L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize::GZip>
+L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize>

=head1 AUTHOR


Modified: trunk/lib/WWW/Contact/Lycos.pm
==============================================================================
--- trunk/lib/WWW/Contact/Lycos.pm (original)
+++ trunk/lib/WWW/Contact/Lycos.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:SACHINJSK';

sub get_contacts {
@@ -95,7 +95,7 @@

=head1 SEE ALSO

-L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize::GZip>
+L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize>

=head1 AUTHOR


Modified: trunk/lib/WWW/Contact/Mail.pm
==============================================================================
--- trunk/lib/WWW/Contact/Mail.pm (original)
+++ trunk/lib/WWW/Contact/Mail.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:SACHINJSK';

sub get_contacts {
@@ -111,7 +111,7 @@

=head1 SEE ALSO

-L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize::GZip>
+L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize>

=head1 AUTHOR


Modified: trunk/lib/WWW/Contact/Plaxo.pm
==============================================================================
--- trunk/lib/WWW/Contact/Plaxo.pm (original)
+++ trunk/lib/WWW/Contact/Plaxo.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.01';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:SACHINJSK';

sub get_contacts {
@@ -101,7 +101,7 @@

=head1 SEE ALSO

-L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize::GZip>
+L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize>

=head1 AUTHOR


Modified: trunk/lib/WWW/Contact/Rediffmail.pm
==============================================================================
--- trunk/lib/WWW/Contact/Rediffmail.pm (original)
+++ trunk/lib/WWW/Contact/Rediffmail.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:SACHINJSK';

sub get_contacts {
@@ -69,6 +69,7 @@
# first_name, last_name, full_name, nickname, e-mail.
my @lines = split(/\n/, $csv);
foreach my $line (@lines) {
+ $line =~ s/"//g;
my @cols = split(',', $line);
push @contacts, {
name => $cols[2],
@@ -108,7 +109,7 @@

=head1 SEE ALSO

-L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize::GZip>
+L<WWW::Contact>, L<WWW::Contact::Base>, L<WWW::Mechanize>

=head1 AUTHOR


Modified: trunk/lib/WWW/Contact/Yahoo.pm
==============================================================================
--- trunk/lib/WWW/Contact/Yahoo.pm (original)
+++ trunk/lib/WWW/Contact/Yahoo.pm Sun Nov 2 07:08:27 2008
@@ -3,7 +3,7 @@
use Moose;
extends 'WWW::Contact::Base';

-our $VERSION = '0.15';
+our $VERSION = '0.16';
our $AUTHORITY = 'cpan:FAYLAND';

has '+ua_class' => ( default => 'WWW::Mechanize::GZip' );

Reply all
Reply to author
Forward
0 new messages