- fixed and improved wordWrap

[squirrelmail.git] / src / folders_delete.php
diff --git a/src/folders_delete.php b/src/folders_delete.php

index a1c67ca0d4d6e2ce20b3ae9ffeeaf139c6cd260b..e6d945effd541aecad07ee57060a692412a445ad 100644 (file)
--- a/src/folders_delete.php
+++ b/src/folders_delete.php
@@ -1,4 +1,16 @@
-<?
+<?php
+   /**
+    **  folders_delete.php
+    **
+    **  Copyright (c) 1999-2000 The SquirrelMail development team
+    **  Licensed under the GNU GPL. For full terms see the file COPYING.
+    **
+    **  Deltes folders from the IMAP server. 
+    **  Called from the folders.php
+    **/
+
+   session_start();
+
     /*
     *  Incoming values:
     *     $mailbox - selected mailbox from the form
@@ -19,14 +31,12 @@
  
     include("../src/load_prefs.php");
  
-   echo "<HTML>";
-   echo "<BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
-   displayPageHeader($color, "None");  
-
     
-   $imap_stream = sqimap_login($username, $key, $imapServerAddress, 0);
+   $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
     $boxes = sqimap_mailbox_list ($imap_stream);
     $dm = sqimap_get_delimiter($imap_stream);
+   $mailbox = sqStripSlashes($mailbox);
+   
     if (substr($mailbox, -1) == $dm)
        $mailbox_no_dm = substr($mailbox, 0, strlen($mailbox) - 1); 
     else
@@ -74,7 +84,9 @@
     /** Log out this session **/
     sqimap_logout($imap_stream);
  
-   echo "<FONT FACE=\"Arial,Helvetica\">";
+   $location = get_location();
+   header ("Location: $location/folders.php?success=delete");
+   /*
     echo "<BR><BR><BR><CENTER><B>";
     echo _("Folder Deleted!");
     echo "</B><BR><BR>";
@@ -83,7 +95,8 @@
     echo _("Click here");
     echo "</A> ";
     echo _("to continue.");
-   echo "</CENTER></FONT>"; 
+   echo "</CENTER>"; 
     
     echo "</BODY></HTML>";
+   */
  ?>