steffen: server/perl-kolab/Kolab-LDAP LDAP.pm,1.24,1.25

[cvs at intevation.de]

Author: steffen

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

Modified Files:
	LDAP.pm 
Log Message:
re-added a right to shared folder all access (Issue656)

Index: LDAP.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-LDAP/LDAP.pm,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -d -r1.24 -r1.25
--- LDAP.pm	11 Nov 2004 11:32:36 -0000	1.24
+++ LDAP.pm	24 Feb 2005 11:16:21 -0000	1.25
@@ -3,7 +3,7 @@
 ##
 ##  Copyright (c) 2003  Code Fusion cc
 ##
-##    Writen by Stuart Bingë  <s.binge at codefusion.co.za>
+##    Writen by Stuart Bing?<s.binge at codefusion.co.za>
 ##
 ##  This  program is free  software; you can redistribute  it and/or
 ##  modify it  under the terms of the GNU  General Public License as
@@ -211,7 +211,7 @@
     elsif( lc $perm eq 'read hidden' ) { $_ = "$uid rs"; }
     elsif( lc $perm eq 'append' ) { $_ = "$uid lrsip"; }
     elsif( lc $perm eq 'write' ) { $_ = "$uid lrsiwcdp"; }
-    elsif( lc $perm eq 'all' ) { if( $sf ) { $_ = "$uid lrsiwcdp"; } else { $_ = "$uid lrsiwcdap"; } }
+    elsif( lc $perm eq 'all' ) { if( $sf ) { $_ = "$uid lrsiwcdap"; } else { $_ = "$uid lrsiwcdap"; } }
     else { $_ = "$uid $perm"; } # passthrough
     if( $post ) { $_ .= 'p'; }
     Kolab::log('L', "Kolab::LDAP::mapAcls() acl=$_", KOLAB_DEBUG);
@@ -574,7 +574,7 @@
 
 =head1 AUTHOR
 
-Stuart Bingë, E<lt>s.binge at codefusion.co.zaE<gt>
+Stuart Bingë¬ E<lt>s.binge at codefusion.co.zaE<gt>
 
 =head1 COPYRIGHT AND LICENSE