clicking on email addr sends you to compose screen

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

index 7af8579ccc0d2f1e60dfa2aec34c97bafb50d0d0..368ccade602b3a625b09dbd06d76188e730e0b09 100644 (file)
--- a/src/folders_rename_do.php
+++ b/src/folders_rename_do.php
@@ -1,14 +1,19 @@
  <?
-   include("../config/config.php");
-   include("../functions/strings.php");
-   include("../functions/page_header.php");
-   include("../functions/imap.php");
-   include("../functions/mailbox.php");
+   session_start();
+
+   if (!isset($config_php))
+      include("../config/config.php");
+   if (!isset($strings_php))
+      include("../functions/strings.php");
+   if (!isset($page_header_php))
+      include("../functions/page_header.php");
+   if (!isset($imap_php))
+      include("../functions/imap.php");
  
     include("../src/load_prefs.php");
  
-   $imapConnection = loginToImapServer($username, $key, $imapServerAddress, 0);
-   $dm = findMailboxDelimeter($imapConnection);
+   $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
+   $dm = sqimap_get_delimiter($imapConnection);
  
     if (strpos($orig, $dm))
        $old_dir = substr($orig, 0, strrpos($orig, $dm));
@@ -20,22 +25,36 @@
     else
        $newone = "$new_name";
  
+   $orig = stripslashes($orig);
+   $newone = stripslashes($newone);
+
     fputs ($imapConnection, ". RENAME \"$orig\" \"$newone\"\n");
-   $data = imapReadData($imapConnection, ".", true, $a, $b);
+   $data = sqimap_read_data($imapConnection, ".", true, $a, $b);
  
     // Renaming a folder doesn't renames the folder but leaves you unsubscribed
     //    at least on Cyrus IMAP servers.
-   fputs ($imapConnection, "sub SUBSCRIBE $newone\n");
-   $data = imapReadData($imapConnection, "sub", true, $a, $b);
+   if ($isfolder) {
+      $newone = $newone.$dm;
+      $orig = $orig.$dm;
+   }   
+
+   sqimap_unsubscribe($imapConnection, $orig);
+   sqimap_subscribe($imapConnection, $newone);
  
     /** Log out this session **/
-   fputs($imapConnection, "1 logout");
+   sqimap_logout($imapConnection);
  
     echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
-   echo "<BR><BR><A HREF=\"webmail.php?right_frame=folders.php\" TARGET=_top>";
-   echo _("Return");
-   echo "</A>";
-   echo "</BODY></HTML>";
+   displayPageHeader($color, "None");
+   echo "<BR><BR><BR><CENTER><B>";
+   echo _("Folder Renamed!");
+   echo "</B><BR><BR>";
+   echo _("The folder has been successfully renamed.");
+   echo "<BR><A HREF=\"webmail.php?PHPSESSID=$PHPSESSID&right_frame=folders.php\" TARGET=_top>";
+   echo _("Click here");
+   echo "</A> ";
+   echo _("to continue.");
+   echo "</CENTER>";
+   
+   echo "</BODY></HTML>"; 
  ?>
-
-