This commit is contained in:
Nick Bebout 2011-03-12 02:43:48 +00:00
parent 42be369d96
commit d13a862f19
5 changed files with 19 additions and 10 deletions

4
CREDITS Normal file
View file

@ -0,0 +1,4 @@
Eric Yung (Suggested --sep1 option)

View file

@ -1,15 +1,20 @@
RCS file: RCS/imapsync,v RCS file: RCS/imapsync,v
Working file: imapsync Working file: imapsync
head: 1.43 head: 1.44
branch: branch:
locks: strict locks: strict
access list: access list:
symbolic names: symbolic names:
keyword substitution: kv keyword substitution: kv
total revisions: 43; selected revisions: 43 total revisions: 44; selected revisions: 44
description: description:
---------------------------- ----------------------------
revision 1.44
date: 2003/11/11 18:01:49; author: gilles; state: Exp; lines: +5 -5
Fixed get_separator call bug for "to" server.
Thanks Eric Yung.
----------------------------
revision 1.43 revision 1.43
date: 2003/11/11 02:18:45; author: gilles; state: Exp; lines: +35 -8 date: 2003/11/11 02:18:45; author: gilles; state: Exp; lines: +35 -8
Added --sep1 and --sep2 options in case NAMESPACE can not be Added --sep1 and --sep2 options in case NAMESPACE can not be

4
README
View file

@ -1,7 +1,7 @@
NAME NAME
imapsync - synchronize mailboxes between two imap servers. imapsync - synchronize mailboxes between two imap servers.
$Revision: 1.43 $ $Revision: 1.44 $
INSTALL INSTALL
Get imapsync at http://www.linux-france.org/prj/imapsync/dist/ Get imapsync at http://www.linux-france.org/prj/imapsync/dist/
@ -136,5 +136,5 @@ SIMILAR SOFTWARES
Feedback (good or bad) will be always welcome. Feedback (good or bad) will be always welcome.
$Id: imapsync,v 1.43 2003/11/11 02:18:45 gilles Exp $ $Id: imapsync,v 1.44 2003/11/11 18:01:49 gilles Exp $

View file

@ -1 +1 @@
1.43 1.44

View file

@ -4,7 +4,7 @@
imapsync - synchronize mailboxes between two imap servers. imapsync - synchronize mailboxes between two imap servers.
$Revision: 1.43 $ $Revision: 1.44 $
=head1 INSTALL =head1 INSTALL
@ -157,7 +157,7 @@ Rate imapsync : http://freshmeat.net/projects/imapsync/
Feedback (good or bad) will be always welcome. Feedback (good or bad) will be always welcome.
$Id: imapsync,v 1.43 2003/11/11 02:18:45 gilles Exp $ $Id: imapsync,v 1.44 2003/11/11 18:01:49 gilles Exp $
=cut =cut
@ -182,12 +182,12 @@ my(
use vars qw ($opt_G); # missing code for this will be option. use vars qw ($opt_G); # missing code for this will be option.
$rcs = ' $Id: imapsync,v 1.43 2003/11/11 02:18:45 gilles Exp $ '; $rcs = ' $Id: imapsync,v 1.44 2003/11/11 18:01:49 gilles Exp $ ';
$rcs =~ m/,v (\d+\.\d+)/; $rcs =~ m/,v (\d+\.\d+)/;
$VERSION = ($1) ? $1 : "UNKNOWN"; $VERSION = ($1) ? $1 : "UNKNOWN";
$error=0; $error=0;
my $banner = '$RCSfile: imapsync,v $ ' . '$Revision: 1.43 $ ' . '$Date: 2003/11/11 02:18:45 $ ' . "\n"; my $banner = '$RCSfile: imapsync,v $ ' . '$Revision: 1.44 $ ' . '$Date: 2003/11/11 18:01:49 $ ' . "\n";
get_options(); get_options();
@ -254,7 +254,7 @@ my($f_sep,$t_sep);
# what are the private folders separators for each server ? # what are the private folders separators for each server ?
$f_sep = get_separator($from, $sep1, "--sep1"); $f_sep = get_separator($from, $sep1, "--sep1");
$t_sep = get_separator($from, $sep2, "--sep2"); $t_sep = get_separator($to, $sep2, "--sep2");
sub get_separator { sub get_separator {
my($imap, $sep_in, $sep_opt) = @_; my($imap, $sep_in, $sep_opt) = @_;