made more tolerant to malformed from field in message header
[squirrelmail.git] / src / empty_trash.php
index ba62c0854fb5314ce2530eaa7ac776ceb200c3e4..279af75eaac657ce58fdcb86035153e5f5b4f3ac 100644 (file)
@@ -1,19 +1,25 @@
-<?
-   include("../config/config.php");
-   include("../functions/strings.php");
-   include("../functions/page_header.php");
-   include("../functions/display_messages.php");
-   include("../functions/imap.php");
-   include("../functions/array.php");
+<?php
+   /**
+    **  empty_trash.php
+    **
+    **  Copyright (c) 1999-2000 The SquirrelMail development team
+    **  Licensed under the GNU GPL. For full terms see the file COPYING.
+    **
+    **  Handles deleting messages from the trash folder without
+    **  deleting subfolders.
+    **
+    **  $Id$
+    **/
 
-   if (!isset($tree_php))
-      include("../functions/tree.php");
+   require_once('../src/validate.php');
+   require_once('../functions/display_messages.php');
+   require_once('../functions/imap.php');
+   require_once('../functions/array.php');
+   require_once('../functions/tree.php');
 
-   include("../src/load_prefs.php");
+   $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 
-   $imap_stream = sqimap_login($username, $key, $imapServerAddress, 0);
-
-   sqimap_mailbox_list($imap_stream, $boxes);
+   sqimap_mailbox_list($imap_stream);
 
    $mailbox = $trash_folder;
    $boxes = sqimap_mailbox_list($imap_stream);
    }
    
    // now lets go through the tree and delete the folders
-   walkTreeInPreOrderDeleteFolders(0, $imap_stream, $foldersTree);
-   // now lets create a new, fresh trash folder
-   sqimap_mailbox_create($imap_stream, "$trash_folder", "");
+   walkTreeInPreOrderEmptyTrash(0, $imap_stream, $foldersTree);
+
+   $location = get_location();
+   header ("Location: $location/left_main.php");
 
-   sqimap_mailbox_select($imap_stream, $trash_folder, $numMessages);
-   echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
-   displayPageHeader($color, $mailbox);
-   messages_deleted_message($trash_folder, $sort, $startMessage, $color);
    sqimap_logout($imap_stream);
-?>
+?>
\ No newline at end of file