r72905 - in /branches/upstream/libnet-imap-simple-perl/current: ./ t/

jotamjr-guest at users.alioth.debian.org jotamjr-guest at users.alioth.debian.org
Thu Apr 21 05:26:37 UTC 2011


Author: jotamjr-guest
Date: Thu Apr 21 05:25:56 2011
New Revision: 72905

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=72905
Log:
[svn-upgrade] new version libnet-imap-simple-perl (1.2022)

Modified:
    branches/upstream/libnet-imap-simple-perl/current/Changes
    branches/upstream/libnet-imap-simple-perl/current/META.yml
    branches/upstream/libnet-imap-simple-perl/current/Simple.pm
    branches/upstream/libnet-imap-simple-perl/current/t/07_select_and_examine.t
    branches/upstream/libnet-imap-simple-perl/current/t/08_selectalot.t
    branches/upstream/libnet-imap-simple-perl/current/t/09_concurrent_connections_new.t
    branches/upstream/libnet-imap-simple-perl/current/t/10_list.t
    branches/upstream/libnet-imap-simple-perl/current/t/11_mailboxes.t
    branches/upstream/libnet-imap-simple-perl/current/t/15_flags.t
    branches/upstream/libnet-imap-simple-perl/current/t/16_exotic_flags.t
    branches/upstream/libnet-imap-simple-perl/current/t/17_status_and_select.t
    branches/upstream/libnet-imap-simple-perl/current/t/19_readline_callback.t
    branches/upstream/libnet-imap-simple-perl/current/t/22_copy_multiple.t
    branches/upstream/libnet-imap-simple-perl/current/t/22_uidcopy_multiple.t
    branches/upstream/libnet-imap-simple-perl/current/t/23_delete_multiple.t
    branches/upstream/libnet-imap-simple-perl/current/t/35_imap_results_in_message_body.t
    branches/upstream/libnet-imap-simple-perl/current/t/45_search.t
    branches/upstream/libnet-imap-simple-perl/current/t/50_body_summary.t
    branches/upstream/libnet-imap-simple-perl/current/t/55_uid_stuff.t
    branches/upstream/libnet-imap-simple-perl/current/t/60_fetch_with_grammar.t

Modified: branches/upstream/libnet-imap-simple-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/Changes?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/Changes (original)
+++ branches/upstream/libnet-imap-simple-perl/current/Changes Thu Apr 21 05:25:56 2011
@@ -1,3 +1,10 @@
+1.2022: Fri Mar 04 2011
+   - horrid little typo in socket builder
+
+1.2021: Fri Mar 04 2011
+   - removed the die() after do("") loading the test server
+     http://goo.gl/FUQPn
+
 1.2020: Mon Feb 07 2011
    - Andrzej Adam Filip requested a CLOSE method for ::PipeSocket
 

Modified: branches/upstream/libnet-imap-simple-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/META.yml?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/META.yml (original)
+++ branches/upstream/libnet-imap-simple-perl/current/META.yml Thu Apr 21 05:25:56 2011
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Net-IMAP-Simple
-version:            1.2020
+version:            1.2022
 abstract:           ~
 author:
     - Paul Miller <jettero at cpan.org>

Modified: branches/upstream/libnet-imap-simple-perl/current/Simple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/Simple.pm?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/Simple.pm (original)
+++ branches/upstream/libnet-imap-simple-perl/current/Simple.pm Thu Apr 21 05:25:56 2011
@@ -9,7 +9,7 @@
 use IO::Select;
 use Net::IMAP::Simple::PipeSocket;
 
-our $VERSION = "1.2020";
+our $VERSION = "1.2022";
 
 BEGIN {
     # I'd really rather the pause/cpan indexers miss this "package"
@@ -154,7 +154,7 @@
             PeerPort => $self->{port},
             Timeout  => $self->{timeout},
             Proto    => 'tcp',
-            ( $self->{bindaddr} ? { LocalAddr => $self->{bindaddr} } : () )
+            ( $self->{bindaddr} ? ( LocalAddr => $self->{bindaddr} ) : () )
         );
     }
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/07_select_and_examine.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/07_select_and_examine.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/07_select_and_examine.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/07_select_and_examine.t Thu Apr 21 05:25:56 2011
@@ -56,4 +56,4 @@
     ok( $imap->select('INBOX'), 2 );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/08_selectalot.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/08_selectalot.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/08_selectalot.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/08_selectalot.t Thu Apr 21 05:25:56 2011
@@ -27,4 +27,4 @@
     ok( $imap->current_box, "INBOX/working" );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/09_concurrent_connections_new.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/09_concurrent_connections_new.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/09_concurrent_connections_new.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/09_concurrent_connections_new.t Thu Apr 21 05:25:56 2011
@@ -23,4 +23,4 @@
     ok( not $c->() );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/10_list.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/10_list.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/10_list.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/10_list.t Thu Apr 21 05:25:56 2011
@@ -28,4 +28,4 @@
     ok( $v, 21 );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/11_mailboxes.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/11_mailboxes.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/11_mailboxes.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/11_mailboxes.t Thu Apr 21 05:25:56 2011
@@ -22,5 +22,5 @@
     ok( $e[$_], $E[$_] ) for 0 .. $#e;
 }   
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/15_flags.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/15_flags.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/15_flags.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/15_flags.t Thu Apr 21 05:25:56 2011
@@ -85,4 +85,4 @@
     ok( defined $imap->deleted(5) );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/16_exotic_flags.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/16_exotic_flags.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/16_exotic_flags.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/16_exotic_flags.t Thu Apr 21 05:25:56 2011
@@ -26,4 +26,4 @@
     ok( (grep {m/carmel/} @flags), 1 );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/17_status_and_select.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/17_status_and_select.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/17_status_and_select.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/17_status_and_select.t Thu Apr 21 05:25:56 2011
@@ -34,4 +34,4 @@
     ok( "total  $total",  "total  10" );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/19_readline_callback.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/19_readline_callback.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/19_readline_callback.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/19_readline_callback.t Thu Apr 21 05:25:56 2011
@@ -36,4 +36,4 @@
     ok( $get_ok,    5 );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/22_copy_multiple.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/22_copy_multiple.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/22_copy_multiple.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/22_copy_multiple.t Thu Apr 21 05:25:56 2011
@@ -44,5 +44,5 @@
     }
 }   
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/22_uidcopy_multiple.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/22_uidcopy_multiple.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/22_uidcopy_multiple.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/22_uidcopy_multiple.t Thu Apr 21 05:25:56 2011
@@ -29,5 +29,5 @@
     ok($imap->select("INBOX/working"), 6 );
 }   
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/23_delete_multiple.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/23_delete_multiple.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/23_delete_multiple.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/23_delete_multiple.t Thu Apr 21 05:25:56 2011
@@ -37,5 +37,5 @@
     ok( $imap->last, 3 );
 }   
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/35_imap_results_in_message_body.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/35_imap_results_in_message_body.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/35_imap_results_in_message_body.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/35_imap_results_in_message_body.t Thu Apr 21 05:25:56 2011
@@ -36,5 +36,5 @@
     ok( $imap->get(1), $special_message );
 }   
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";
 

Modified: branches/upstream/libnet-imap-simple-perl/current/t/45_search.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/45_search.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/45_search.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/45_search.t Thu Apr 21 05:25:56 2011
@@ -34,4 +34,4 @@
     ok( 0+$imap->search_subject("test-3"), 1 );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/50_body_summary.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/50_body_summary.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/50_body_summary.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/50_body_summary.t Thu Apr 21 05:25:56 2011
@@ -65,4 +65,4 @@
     ok( $parts[1]->charset(), "fake-charset-2" );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/55_uid_stuff.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/55_uid_stuff.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/55_uid_stuff.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/55_uid_stuff.t Thu Apr 21 05:25:56 2011
@@ -37,4 +37,4 @@
     ok( "@ssuid", "@uid" );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
+do "t/test_server.pm";

Modified: branches/upstream/libnet-imap-simple-perl/current/t/60_fetch_with_grammar.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libnet-imap-simple-perl/current/t/60_fetch_with_grammar.t?rev=72905&op=diff
==============================================================================
--- branches/upstream/libnet-imap-simple-perl/current/t/60_fetch_with_grammar.t (original)
+++ branches/upstream/libnet-imap-simple-perl/current/t/60_fetch_with_grammar.t Thu Apr 21 05:25:56 2011
@@ -61,8 +61,7 @@
     ok( $res->{2}{'BODY[HEADER.FIELDS (DATE FROM SUBJECT)]'} =~ m/4:12.*Paul Miller.*test2/s );
 }
 
-do "t/test_server.pm" or die "error starting imap server: $!$@";
-
+do "t/test_server.pm";
 
 sub get_messages {
     my @messages = (<<TEST1, <<TEST2);




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