gunnar: server/perl-kolab/perl-kolab/lib/Kolab Cyrus.pm,1.2,1.3
cvs at kolab.org
cvs at kolab.org
Tue Mar 30 08:41:53 CEST 2010
Author: gunnar
Update of /kolabrepository/server/perl-kolab/perl-kolab/lib/Kolab
In directory doto:/tmp/cvs-serv10651/perl-kolab/lib/Kolab
Modified Files:
Cyrus.pm
Log Message:
Do not interpret every folder as calendar. kolab/issue4237 (additional event.default folder created by kolabd (rt#6038))
Index: Cyrus.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/perl-kolab/lib/Kolab/Cyrus.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- Cyrus.pm 23 Mar 2010 18:02:11 -0000 1.2
+++ Cyrus.pm 30 Mar 2010 06:41:50 -0000 1.3
@@ -126,7 +126,8 @@
foreach my $mailbox (@mailboxes) {
my $u = @{$mailbox}[0];
%info = $cyrus->info($u, ('/vendor/kolab/folder-type'));
- if ($info{'/vendor/kolab/folder-type'} == 'event.default') {
+ my $key = '/mailbox/{' . $u . '}/vendor/kolab/folder-type';
+ if (exists($info{$key}) && $info{$key} eq 'event.default') {
$calendar = $u;
}
}
More information about the commits
mailing list