X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Ffolders_rename_do.php;h=79175d1b379224f1d83a15d5ec62c98f1ab9d088;hb=439166c1f3a86f2713c3a380e965bc977a3c3b52;hp=b5d04d04bfbd0717474c9d3228ba305a024a097a;hpb=813eba2f5f4695bd30b895cd148658f3b90bf120;p=squirrelmail.git diff --git a/src/folders_rename_do.php b/src/folders_rename_do.php index b5d04d04..79175d1b 100644 --- a/src/folders_rename_do.php +++ b/src/folders_rename_do.php @@ -1,39 +1,51 @@ -\n"; - echo "

"; - echo _("Return"); - echo ""; - echo ""; + $new_name) { + + $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); + + if (strpos($orig, $delimiter)) { + $old_dir = substr($orig, 0, strrpos($orig, $delimiter)); + } else { + $old_dir = ''; + } + + if ($old_dir != '') { + $newone = $old_dir . $delimiter . $new_name; + } else { + $newone = $new_name; + } + + // Renaming a folder doesn't renames the folder but leaves you unsubscribed + // at least on Cyrus IMAP servers. + if (isset($isfolder)) { + $newone = $newone.$delimiter; + $orig = $orig.$delimiter; + } + sqimap_mailbox_rename( $imapConnection, $orig, $newone ); + + // Log out this session + sqimap_logout($imapConnection); + +} +header ('Location: ' . $base_uri . 'src/folders.php'); ?>