X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Ffolders_rename_do.php;h=e7db59ce45041aa800823fcf652273f65711d61d;hb=150c28d60c69f5f9a8299251a7e36e09c1f863b7;hp=368ccade602b3a625b09dbd06d76188e730e0b09;hpb=2a32fc83f95eba42be0d1752ef685adf10e1edc9;p=squirrelmail.git diff --git a/src/folders_rename_do.php b/src/folders_rename_do.php index 368ccade..e7db59ce 100644 --- a/src/folders_rename_do.php +++ b/src/folders_rename_do.php @@ -1,60 +1,85 @@ - - 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 = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); - $dm = sqimap_get_delimiter($imapConnection); - - if (strpos($orig, $dm)) - $old_dir = substr($orig, 0, strrpos($orig, $dm)); - else - $old_dir = ""; - - if ($old_dir != "") - $newone = "$old_dir$dm$new_name"; - else - $newone = "$new_name"; - - $orig = stripslashes($orig); - $newone = stripslashes($newone); - - fputs ($imapConnection, ". RENAME \"$orig\" \"$newone\"\n"); - $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. - if ($isfolder) { - $newone = $newone.$dm; - $orig = $orig.$dm; - } - - sqimap_unsubscribe($imapConnection, $orig); - sqimap_subscribe($imapConnection, $newone); - - /** Log out this session **/ - sqimap_logout($imapConnection); - - echo "
\n"; - displayPageHeader($color, "None"); - echo "