X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Ffolders_rename_do.php;h=8807f6456c2bd9a72a3937e7c142942e143dfabb;hb=d2c47f00c6069f0e42dc1d99f2f23b53a0a7a118;hp=e2db9ccbdf49afd2ed047ccc8f32aa49463cb159;hpb=6ee631f7b92f6a205e0841ac40e6b0e763a5a734;p=squirrelmail.git diff --git a/src/folders_rename_do.php b/src/folders_rename_do.php index e2db9ccb..8807f645 100644 --- a/src/folders_rename_do.php +++ b/src/folders_rename_do.php @@ -11,11 +11,8 @@ ** $Id$ **/ - include("../src/validate.php"); - include("../functions/page_header.php"); - include("../functions/imap.php"); - include("../src/load_prefs.php"); - + require_once('../src/validate.php'); + require_once('../functions/imap.php'); if($old_name == $new_name) { $location = get_location(); @@ -36,8 +33,10 @@ else $newone = "$new_name"; - fputs ($imapConnection, ". RENAME \"$orig\" \"$newone\"\r\n"); - $data = sqimap_read_data($imapConnection, ".", true, $a, $b); + $cmd = sqimap_session_id() . " RENAME \"" . quoteIMAP($orig) . "\" \"" . + quoteIMAP($newone) . "\"\r\n"; + fputs ($imapConnection, $cmd); + $data = sqimap_read_data($imapConnection, sqimap_session_id(), true, $a, $b); // Renaming a folder doesn't renames the folder but leaves you unsubscribed // at least on Cyrus IMAP servers. @@ -48,8 +47,9 @@ sqimap_unsubscribe($imapConnection, $orig); sqimap_subscribe($imapConnection, $newone); - fputs ($imapConnection, "a001 LIST \"\" \"$newone*\"\r\n"); - $data = sqimap_read_data($imapConnection, "a001", true, $a, $b); + fputs ($imapConnection, sqimap_session_id() . " LIST \"\" \"" . quoteIMAP($newone) . + "*\"\r\n"); + $data = sqimap_read_data($imapConnection, sqimap_session_id(), true, $a, $b); for ($i=0; $i < count($data); $i++) { $name = find_mailbox_name($data[$i]); @@ -67,4 +67,4 @@ sqimap_logout($imapConnection); $location = get_location(); header ("Location: $location/folders.php?success=rename"); -?> +?> \ No newline at end of file