r1515 - in packages/libnet-imap-simple-perl/trunk: . debian
lib/Net/IMAP
Gunnar Wolf
gwolf at costa.debian.org
Thu Nov 17 18:02:21 UTC 2005
Author: gwolf
Date: 2005-11-17 18:02:17 +0000 (Thu, 17 Nov 2005)
New Revision: 1515
Modified:
packages/libnet-imap-simple-perl/trunk/Changes
packages/libnet-imap-simple-perl/trunk/META.yml
packages/libnet-imap-simple-perl/trunk/debian/changelog
packages/libnet-imap-simple-perl/trunk/lib/Net/IMAP/Simple.pm
Log:
New upstream version
Modified: packages/libnet-imap-simple-perl/trunk/Changes
===================================================================
--- packages/libnet-imap-simple-perl/trunk/Changes 2005-11-17 17:59:57 UTC (rev 1514)
+++ packages/libnet-imap-simple-perl/trunk/Changes 2005-11-17 18:02:17 UTC (rev 1515)
@@ -1,4 +1,17 @@
Revision history for Perl extension Net::IMAP::Simple.
+1.14 2005-10-01
+ - Fixed error in sample code within the POD documentation
+ identified by Matthew S. Hallacy
+
+1.13 2005-09-28
+ - Versioning schema changed to use CVS versioning rather than
+ hard coded versioning. This is to address issues some people
+ are having with bug tracking and package management tools.
+
+0.105 2005-09-28
+ - Fixed syntax problem in the bindaddr option. Thanks
+ Dagobert Michelsen for pointing this out.
+
0.104 2005-08-06
- Fixed major bug discovered in get() and getfh() which caused
message lines to be dropped if they started with an "*"
Modified: packages/libnet-imap-simple-perl/trunk/META.yml
===================================================================
--- packages/libnet-imap-simple-perl/trunk/META.yml 2005-11-17 17:59:57 UTC (rev 1514)
+++ packages/libnet-imap-simple-perl/trunk/META.yml 2005-11-17 18:02:17 UTC (rev 1515)
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Net-IMAP-Simple
-version: 0.104
+version: 1.14
version_from: lib/Net/IMAP/Simple.pm
installdirs: site
requires:
Modified: packages/libnet-imap-simple-perl/trunk/debian/changelog
===================================================================
--- packages/libnet-imap-simple-perl/trunk/debian/changelog 2005-11-17 17:59:57 UTC (rev 1514)
+++ packages/libnet-imap-simple-perl/trunk/debian/changelog 2005-11-17 18:02:17 UTC (rev 1515)
@@ -1,6 +1,12 @@
+libnet-imap-simple-perl (1.14-1) unstable; urgency=low
+
+ * New upstream release
+
+ -- Gunnar Wolf <gwolf at debian.org> Thu, 17 Nov 2005 11:56:35 -0600
+
libnet-imap-simple-perl (0.104-1) unstable; urgency=low
- * Initial real upload to Debian - Sorry, thought I had already \
+ * Initial real upload to Debian - Sorry, thought I had already
uploaded... Good thing I did it now, as the author's versioning scheme
is severely fucked up. (Closes: #252609, #322647)
* Added debian/watch
Modified: packages/libnet-imap-simple-perl/trunk/lib/Net/IMAP/Simple.pm
===================================================================
--- packages/libnet-imap-simple-perl/trunk/lib/Net/IMAP/Simple.pm 2005-11-17 17:59:57 UTC (rev 1514)
+++ packages/libnet-imap-simple-perl/trunk/lib/Net/IMAP/Simple.pm 2005-11-17 18:02:17 UTC (rev 1515)
@@ -1,11 +1,10 @@
package Net::IMAP::Simple;
-# $Id: Simple.pm,v 1.11 2005/08/06 10:38:04 cfaber Exp $
use strict;
use IO::File;
use IO::Socket;
use vars qw[$VERSION];
-$VERSION = '0.104';
+$VERSION = $1 if('$Id: Simple.pm,v 1.14 2005/10/01 22:46:50 cfaber Exp $' =~ /,v ([\d.]+) /);
=head1 NAME
@@ -30,7 +29,7 @@
# Print the subject's of all the messages in the INBOX
my $nm = $imap->select('INBOX');
- for(my $i = 1; $i < $nm; $i++){
+ for(my $i = 1; $i <= $nm; $i++){
if($imap->seen($i)){
print "*";
} else {
@@ -148,7 +147,7 @@
PeerPort => $self->{port},
Timeout => $self->{timeout},
Proto => 'tcp',
- ($self->{bindaddr} ? { LocalAddr => $self->{bindaddr} } : '')
+ ($self->{bindaddr} ? { LocalAddr => $self->{bindaddr} } : ())
);
return $sock;
More information about the Pkg-perl-cvs-commits
mailing list