do not create /cluster/<cid> unconditionally

[pmg-api.git] / src / PMG / MailQueue.pm

diff --git a/src/PMG/MailQueue.pm b/src/PMG/MailQueue.pm
index e0f56b91ab9e5f814b0ed249d2d27396b2404b5b..435f16869ff4d4dd21044d94e2b78dfa3de7127f 100644 (file)
--- a/src/PMG/MailQueue.pm
+++ b/src/PMG/MailQueue.pm
@@ -285,7 +285,6 @@ sub quarantine_mail {
     eval {
        if ($lcid) {
            my $subdir = "cluster/$lcid/$subpath";
-           mkpath $subdir;
            ($fh, $uid, $path) = new_fileid ($spooldir, $subdir);
        } else {
            ($fh, $uid, $path) = new_fileid ($spooldir, $subpath);