fixed bug that enabled creating folders under "noinferior" folders
[squirrelmail.git] / src / folders_rename_getname.php
CommitLineData
be69e508 1<?
d068c0ec 2 if (!isset($config_php))
3 include("../config/config.php");
4 if (!isset($strings_php))
5 include("../functions/strings.php");
6 if (!isset($page_header_php))
7 include("../functions/page_header.php");
8 if (!isset($imap_php))
9 include("../functions/imap.php");
be69e508 10
d3cdb279 11 include("../src/load_prefs.php");
12
813eba2f 13 $imapConnection = sqimap_login($username, $key, $imapServerAddress, 0);
14 sqimap_mailbox_select($imapConnection, $old);
be69e508 15
813eba2f 16 $dm = sqimap_get_delimiter($imapConnection);
d92b6f31 17 if (strpos($old, $dm)) {
18 $old_name = substr($old, strrpos($old, $dm)+1, strlen($old));
19 $old_parent = substr($old, 0, strrpos($old, $dm));
20 } else {
21 $old_name = $old;
22 $old_parent = "";
23 }
be69e508 24
f8f9bed9 25 echo "<HTML><BODY TEXT=\"$color[8]\" BGCOLOR=\"$color[4]\" LINK=\"$color[7]\" VLINK=\"$color[7]\" ALINK=\"$color[7]\">\n";
26 displayPageHeader($color, "None");
be69e508 27 echo "<TABLE WIDTH=100% COLS=1>";
aae41ae9 28 echo "<TR><TD BGCOLOR=\"$color[0]\" ALIGN=CENTER><B>";
036a8a9d 29 echo _("Rename a folder");
aae41ae9 30 echo "</B></TD></TR>";
f8f9bed9 31 echo "<TR><TD BGCOLOR=\"$color[4]\" ALIGN=CENTER>";
be69e508 32 echo "<FORM ACTION=folders_rename_do.php METHOD=POST>\n";
036a8a9d 33 echo _("New name:");
34 echo " &nbsp;&nbsp;<INPUT TYPE=TEXT SIZE=25 NAME=new_name VALUE=\"$old_name\"><BR>\n";
be69e508 35 echo "<INPUT TYPE=HIDDEN NAME=orig VALUE=\"$old\">";
036a8a9d 36 echo "<INPUT TYPE=SUBMIT VALUE=\"";
37 echo _("Submit");
38 echo "\">\n";
be69e508 39 echo "</FORM><BR></TD></TR>";
40 echo "</TABLE>";
41
42 /** Log out this session **/
813eba2f 43 sqimap_logout($imapConnection);
be69e508 44?>
45
46