equal
deleted
inserted
replaced
309 $e->dump if $Cf->debug; |
309 $e->dump if $Cf->debug; |
310 |
310 |
311 if ($modified) { |
311 if ($modified) { |
312 $r = $e->update($ldap); |
312 $r = $e->update($ldap); |
313 die $r->error.$r->code if $r->code; |
313 die $r->error.$r->code if $r->code; |
314 } |
|
315 |
|
316 # FIXME: Wenn keine Mailbox existiert, gibt es hier ein Problem |
|
317 if (defined $Cf->imap_quota) { |
|
318 # $imap->setquota($mbox, STORAGE => $Cf->imap_quota * 1024) |
|
319 # or die $@; |
|
320 } |
314 } |
321 |
315 |
322 verbose "ok\n"; |
316 verbose "ok\n"; |
323 |
317 |
324 print "\n"; |
318 print "\n"; |