fixed several warnings about Undefined vars
[squirrelmail.git] / src / delete_message.php
CommitLineData
59177427 1<?php
895905c0 2
35586184 3/**
4 * delete_message.php
5 *
15e6162e 6 * Copyright (c) 1999-2002 The SquirrelMail Project Team
35586184 7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
65c3ec94 9 * Deletes a meesage from the IMAP server
35586184 10 *
11 * $Id$
12 */
ef870322 13
35586184 14require_once('../src/validate.php');
15require_once('../functions/display_messages.php');
16require_once('../functions/imap.php');
d3cdb279 17
65c3ec94 18$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
19
20sqimap_mailbox_select($imapConnection, $mailbox);
d4467150 21
65c3ec94 22sqimap_messages_delete($imapConnection, $message, $message, $mailbox);
23if ($auto_expunge) {
24 sqimap_mailbox_expunge($imapConnection, $mailbox, true);
25}
9c3e6cd4 26if (!isset($saved_draft)) {
27 $saved_draft = '';
28}
acaa9842 29
65c3ec94 30$location = get_location();
31if (isset($where) && isset($what)) {
32 header("Location: $location/search.php?where=" . urlencode($where) .
33 '&what=' . urlencode($what) . '&mailbox=' . urlencode($mailbox));
34} else {
9c3e6cd4 35 if ($compose_new_win == '1') {
36 header("Location: $location/compose.php?mail_sent=$mail_sent&saved_draft=$saved_draft");
37 }
38 else {
65c3ec94 39 header("Location: $location/right_main.php?sort=$sort&startMessage=$startMessage&mailbox=" .
40 urlencode($mailbox));
9c3e6cd4 41 }
65c3ec94 42}
a48fbf9b 43
65c3ec94 44sqimap_logout($imapConnection);
35586184 45?>