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

View file

@ -4,7 +4,7 @@
imapsync - synchronize mailboxes between two imap servers.
$Revision: 1.43 $
$Revision: 1.44 $
=head1 INSTALL
@ -157,7 +157,7 @@ Rate imapsync : http://freshmeat.net/projects/imapsync/
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
@ -182,12 +182,12 @@ my(
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+)/;
$VERSION = ($1) ? $1 : "UNKNOWN";
$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();
@ -254,7 +254,7 @@ my($f_sep,$t_sep);
# what are the private folders separators for each server ?
$f_sep = get_separator($from, $sep1, "--sep1");
$t_sep = get_separator($from, $sep2, "--sep2");
$t_sep = get_separator($to, $sep2, "--sep2");
sub get_separator {
my($imap, $sep_in, $sep_opt) = @_;