mirror of
https://github.com/imapsync/imapsync.git
synced 2025-07-22 18:25:54 +02:00
1.83
This commit is contained in:
parent
22e9c13cd4
commit
dd4b175c49
5 changed files with 22 additions and 10 deletions
4
CREDITS
4
CREDITS
|
@ -1,3 +1,7 @@
|
|||
|
||||
Christophe Labouisse
|
||||
Add a pb with dbmail headers (first blank added)
|
||||
|
||||
William Hernandez (fromESS/PR Webmasters)
|
||||
Wrote patch for --timeout
|
||||
Gave IMail 7.15 new problem/success story
|
||||
|
|
|
@ -1,15 +1,20 @@
|
|||
|
||||
RCS file: RCS/imapsync,v
|
||||
Working file: imapsync
|
||||
head: 1.82
|
||||
head: 1.83
|
||||
branch:
|
||||
locks: strict
|
||||
access list:
|
||||
symbolic names:
|
||||
keyword substitution: kv
|
||||
total revisions: 82; selected revisions: 82
|
||||
total revisions: 83; selected revisions: 83
|
||||
description:
|
||||
----------------------------
|
||||
revision 1.83
|
||||
date: 2004/03/12 02:29:00; author: gilles; state: Exp; lines: +8 -5
|
||||
Do not parse first blanks in headers (dbmail bug, thanks to
|
||||
Christophe Labouisse)
|
||||
----------------------------
|
||||
revision 1.82
|
||||
date: 2004/03/12 01:40:27; author: gilles; state: Exp; lines: +6 -6
|
||||
removed only
|
||||
|
|
4
README
4
README
|
@ -2,7 +2,7 @@ NAME
|
|||
imapsync - IMAP sync or copy tool. Synchronize mailboxes between two
|
||||
imap servers.
|
||||
|
||||
$Revision: 1.82 $
|
||||
$Revision: 1.83 $
|
||||
|
||||
INSTALL
|
||||
imapsync works fine under any Unix OS.
|
||||
|
@ -211,5 +211,5 @@ AUTHOR
|
|||
teaching free open and gratis softwares. Don't hesitate to pay him for
|
||||
that services.
|
||||
|
||||
$Id: imapsync,v 1.82 2004/03/12 01:40:27 gilles Exp $
|
||||
$Id: imapsync,v 1.83 2004/03/12 02:29:00 gilles Exp $
|
||||
|
||||
|
|
2
VERSION
2
VERSION
|
@ -1 +1 @@
|
|||
1.82
|
||||
1.83
|
||||
|
|
13
imapsync
13
imapsync
|
@ -4,7 +4,7 @@
|
|||
|
||||
imapsync - IMAP sync or copy tool. Synchronize mailboxes between two imap servers.
|
||||
|
||||
$Revision: 1.82 $
|
||||
$Revision: 1.83 $
|
||||
|
||||
=head1 INSTALL
|
||||
|
||||
|
@ -249,7 +249,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.82 2004/03/12 01:40:27 gilles Exp $
|
||||
$Id: imapsync,v 1.83 2004/03/12 02:29:00 gilles Exp $
|
||||
|
||||
=cut
|
||||
|
||||
|
@ -286,7 +286,7 @@ my(
|
|||
use vars qw ($opt_G); # missing code for this will be option.
|
||||
|
||||
|
||||
$rcs = ' $Id: imapsync,v 1.82 2004/03/12 01:40:27 gilles Exp $ ';
|
||||
$rcs = ' $Id: imapsync,v 1.83 2004/03/12 02:29:00 gilles Exp $ ';
|
||||
$rcs =~ m/,v (\d+\.\d+)/;
|
||||
$VERSION = ($1) ? $1 : "UNKNOWN";
|
||||
|
||||
|
@ -322,8 +322,8 @@ $error=0;
|
|||
|
||||
my $banner = join("",
|
||||
'$RCSfile: imapsync,v $ ',
|
||||
'$Revision: 1.82 $ ',
|
||||
'$Date: 2004/03/12 01:40:27 $ ',
|
||||
'$Revision: 1.83 $ ',
|
||||
'$Date: 2004/03/12 02:29:00 $ ',
|
||||
"\n",
|
||||
"Mail::IMAPClient version used here is ",
|
||||
$VERSION_IMAPClient, " auth md5 : $md5_supported",
|
||||
|
@ -779,6 +779,9 @@ sub parse_header_msg {
|
|||
foreach my $val ( @{$head->{$h}}) {
|
||||
# no 8-bit data in headers !
|
||||
$val =~ s/[\x80-\xff]/X/g;
|
||||
# remove the first blanks (dbmail bug)
|
||||
$val =~ s/^\s+//;
|
||||
# show stuff in debug mode
|
||||
$debug and print "${s}H $h:", $val, "\n";
|
||||
$headstr .= "$h:". $val;
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue