disable regexp compilation error

[squirrelmail.git] / src / delete_message.php

diff --git a/src/delete_message.php b/src/delete_message.php
index af16dd59fa2a61a9962a632e91afba2ea70280a1..56f6da3f76e1c3ae072288f6585ed7e7bf4e3f28 100644 (file)
--- a/src/delete_message.php
+++ b/src/delete_message.php
@@ -3,48 +3,25 @@
 /**
  * delete_message.php
  *
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
- * Licensed under the GNU GPL. For full terms see the file COPYING.
- *
  * Deletes a meesage from the IMAP server
  *
- * $Id$
+ * @copyright © 1999-2006 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
+ * @version $Id$
+ * @package squirrelmail
  */
 
-require_once('../src/validate.php');
-require_once('../functions/display_messages.php');
-require_once('../functions/imap.php');
-
-$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
-
-sqimap_mailbox_select($imapConnection, $mailbox);
-
-sqimap_messages_delete($imapConnection, $message, $message, $mailbox);
-if ($auto_expunge) {
-    sqimap_mailbox_expunge($imapConnection, $mailbox, true);
-}
-if (!isset($saved_draft)) {
-    $saved_draft = '';
-}
-
-if (!isset($mail_sent)) {
-    $mail_sent = '';
-}
-
-$location = get_location();
+/**
+ * Path for SquirrelMail required files.
+ * @ignore
+ */
+define('SM_PATH','../');
 
-if (isset($where) && isset($what)) {
-    header("Location: $location/search.php?where=" . urlencode($where) .
-           '&what=' . urlencode($what) . '&mailbox=' . urlencode($mailbox));
-} else {
-    if (!empty($saved_draft) || !empty($mail_sent)) {
-          header("Location: $location/compose.php?mail_sent=$mail_sent&saved_draft=$saved_draft");
-    }
-    else {
-    header("Location: $location/right_main.php?sort=$sort&startMessage=$startMessage&mailbox=" .
-           urlencode($mailbox));
-    }
-}
+/* SquirrelMail required files. */
+include_once(SM_PATH . 'include/validate.php');
+include_once(SM_PATH . 'functions/display_messages.php');
 
-sqimap_logout($imapConnection);
-?>
+global $color;
+error_box('delete_message.php script is obsolete since 1.5.1.',$color);
+$oTemplate->display('footer.tpl');
+?>
\ No newline at end of file