steffen: server/perl-kolab/Kolab-LDAP LDAP.pm,1.11,1.12

cvs at intevation.de cvs at intevation.de
Sun Jul 11 18:12:10 CEST 2004


Author: steffen

Update of /kolabrepository/server/perl-kolab/Kolab-LDAP
In directory doto:/tmp/cvs-serv21896/Kolab-LDAP

Modified Files:
	LDAP.pm 
Log Message:
added kolab-n and kolab-r user and group ids to config

Index: LDAP.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-LDAP/LDAP.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- LDAP.pm	8 Jul 2004 11:43:48 -0000	1.11
+++ LDAP.pm	11 Jul 2004 16:12:07 -0000	1.12
@@ -282,6 +282,12 @@
 	      # Hide user mailboxes on other servers
 	      Kolab::Cyrus::setACL($cyrus,$uid,0, ["$uid rswipcda"]);
 	    }
+#	    if( $p ne 'sf' ) {
+#	      # Create FB dir for user
+#	      my $fbdir = $Kolab::config{'prefix'}.'/var/kolab/www/freebusy/'.$uid;
+#	      mkdir( $fbdir, 0750);
+#	      chown( $Kolab::config{'kolab_n_uid'},$Kolab::config{'kolab_n_gid'},$fbdir );
+#	    }
             Kolab::DirServ::genericRequest($object, "new alias") if $p eq 'user';
         }
     }
@@ -327,6 +333,11 @@
     Kolab::DirServ::genericRequest($object, "remove alias") if $p eq 'user';
 
     Kolab::Cyrus::deleteMailbox($cyrus, $uid, ($p eq 'sf' ? 1 : 0));
+#    if( $p ne 'sf' ) {
+#      # Create FB dir for user
+#      my $fbdir = $Kolab::config{'prefix'}.'/var/kolab/www/freebusy/'.$uid;
+#      system("rm -rf \"$fbdir\"" );
+#    }
     delete $uid_db{$guid};
     return;
 }





More information about the commits mailing list