zydronium/imapsync
1
0
Fork 0
mirror of https://github.com/imapsync/imapsync.git synced 2025-07-30 13:56:07 +02:00
Code Issues Projects Releases Packages Wiki Activity

1.167

Browse source
This commit is contained in:
Nick Bebout 2011-03-12 02:44:25 +00:00
parent c6afe6877b
commit d34bdb8bd4
5 changed files with 16 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

12
imapsync
View file

@ -6,7 +6,7 @@ imapsync - IMAP synchronization, copy or migration
tool. Synchronize mailboxes between two imap servers. Good
at IMAP migration.
$Revision: 1.166 $
$Revision: 1.167 $
=head1 INSTALL
@ -337,7 +337,7 @@ Gilles LAMIRAL earn his living writing, installing,
configuring and teaching free open and gratis
softwares. Don't hesitate to pay him for that services.
$Id: imapsync,v 1.166 2006/03/30 02:22:39 gilles Exp $
$Id: imapsync,v 1.167 2006/03/30 02:33:00 gilles Exp $
=cut
@ -392,7 +392,7 @@ my(
use vars qw ($opt_G); # missing code for this will be option.
$rcs = ' $Id: imapsync,v 1.166 2006/03/30 02:22:39 gilles Exp $ ';
$rcs = ' $Id: imapsync,v 1.167 2006/03/30 02:33:00 gilles Exp $ ';
$rcs =~ m/,v (\d+\.\d+)/;
$VERSION = ($1) ? $1 : "UNKNOWN";
@ -429,8 +429,8 @@ $error=0;
my $banner = join("",
'$RCSfile: imapsync,v $ ',
'$Revision: 1.166 $ ',
'$Date: 2006/03/30 02:22:39 $ ',
'$Revision: 1.167 $ ',
'$Date: 2006/03/30 02:33:00 $ ',
"\n",
"Mail::IMAPClient version used here is ",
$VERSION_IMAPClient,"\n"
@ -1543,7 +1543,7 @@ sub parse_headers2 {
my $headers = {}; # hash from message ids to header hash
my $split = $self->Split() || scalar(@$msgspec_all);
while(my @msgs = splice(@$msgspec_all, 0, $split)) {
print "SPLIT: @msgs\n";
$debug and print "SPLIT: @msgs\n";
my $msgspec = \@msgs;
# Make $msg a comma separated list, of messages we want