diff options
| author | Jeroen van Meeuwen (Kolab Systems) <vanmeeuwen@kolabsys.com> | 2011-06-15 18:12:50 (GMT) |
|---|---|---|
| committer | Jeroen van Meeuwen (Kolab Systems) <vanmeeuwen@kolabsys.com> | 2011-06-15 18:12:50 (GMT) |
| commit | baa2d91f5ba5deae5d2c5d1c26471166f187490d (patch) | |
| tree | 5b94a18863ec8c41a4a255a69a00b91bf4ad63fe | |
| parent | 381f418a1f6cd0ac1aae4da79f1ca4e33dad0a04 (diff) | |
| download | perl-Kolab-baa2d91f5ba5deae5d2c5d1c26471166f187490d.tar.gz | |
Insert return codes on Kolab::cyrusMurderRenameMailbox()
| -rw-r--r-- | lib/Kolab.pm | 2 | ||||
| -rw-r--r-- | lib/Kolab/Cyrus.pm | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lib/Kolab.pm b/lib/Kolab.pm index 91ae68c..710c29f 100644 --- a/lib/Kolab.pm +++ b/lib/Kolab.pm @@ -727,7 +727,7 @@ Example usage: # folder a boolean. my $sharedFolder = ( $mailboxType eq 'user' ? 0 : 1 ); - Kolab::Cyrus::renameMailbox( + return Kolab::Cyrus::renameMailbox( $cyrus, $mailboxName, $newMailboxName, diff --git a/lib/Kolab/Cyrus.pm b/lib/Kolab/Cyrus.pm index 1cabab1..7ed630a 100644 --- a/lib/Kolab/Cyrus.pm +++ b/lib/Kolab/Cyrus.pm @@ -219,7 +219,10 @@ sub renameMailbox if (!$cyrus->renamemailbox($mailboxPath, $newMailboxPath)) { Kolab::log('Y', "Unable to rename mailbox `$mailboxPath' to `$newMailboxPath', Error = `" . $cyrus->error . "'", KOLAB_WARN); + return 1; } + + return 0; } sub transferMailbox |