wilde: utils/admin kolab-mailboxinfo.pl,1.2,1.3
cvs at kolab.org
cvs at kolab.org
Wed Jan 30 16:22:34 CET 2008
Author: wilde
Update of /kolabrepository/utils/admin
In directory doto:/tmp/cvs-serv22105
Modified Files:
kolab-mailboxinfo.pl
Log Message:
Fixed (added) quoting in kolab-mailboxinfo cyradm command output.
Index: kolab-mailboxinfo.pl
===================================================================
RCS file: /kolabrepository/utils/admin/kolab-mailboxinfo.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- kolab-mailboxinfo.pl 30 Jan 2008 14:50:00 -0000 1.2
+++ kolab-mailboxinfo.pl 30 Jan 2008 15:22:32 -0000 1.3
@@ -30,7 +30,7 @@
my %rights = $cyrus->listacl(${mailbox});
foreach my $user (sort keys %rights) {
if($opt_c == 1) {
- print "sam ${mailbox} $user $rights{$user}\n";
+ print "sam \"${mailbox}\" $user $rights{$user}\n";
} else {
print "${mailbox}: acl $user: $rights{$user}\n";
}
@@ -42,7 +42,7 @@
$attrib =~ s/^[^}]*}//;
if(not $attrib =~ /^\/vendor\/cmu\//) {
if($opt_c == 1) {
- print "mboxcfg ${mailbox} $attrib $info{$key}\n";
+ print "mboxcfg \"${mailbox}\" $attrib $info{$key}\n";
} else {
print "${mailbox}: annotation $attrib: $info{$key}\n";
}
More information about the commits
mailing list