* Fixes NB#97139, New folder dialog is now always shown when invoked
[modest] / src / hildon2 / modest-platform.c
index 2a2110e..cba3df5 100644 (file)
 #include <canberra.h>
 #include <modest-datetime-formatter.h>
 #include "modest-header-window.h"
+#include <modest-folder-window.h>
+#include <modest-account-mgr.h>
+#include <modest-account-mgr-helpers.h>
+#include <modest-ui-constants.h>
+#include <modest-selector-picker.h>
+#include <modest-icon-names.h>
 
 #ifdef MODEST_HAVE_MCE
 #include <mce/dbus-names.h>
 #define PROFILE_MAIL_TONE PROFILEKEY_EMAIL_ALERT_TONE
 #define PROFILE_MAIL_VOLUME PROFILEKEY_EMAIL_ALERT_VOLUME
 
+#define COMMON_FOLDER_DIALOG_ENTRY "entry"
+#define COMMON_FOLDER_DIALOG_ACCOUNT_PICKER "account-picker"
+#define FOLDER_PICKER_CURRENT_FOLDER "current-folder"
+
+
 static void _modest_platform_play_email_tone (void);
 
 
@@ -604,8 +615,7 @@ on_response (GtkDialog *dialog,
             gint response,
             gpointer user_data)
 {
-       GList *child_vbox, *child_hbox;
-       GtkWidget *hbox, *entry;
+       GtkWidget *entry, *picker;
        TnyFolderStore *parent;
        const gchar *new_name;
        gboolean exists;
@@ -614,15 +624,18 @@ on_response (GtkDialog *dialog,
                return;
        
        /* Get entry */
-       child_vbox = gtk_container_get_children (GTK_CONTAINER (dialog->vbox));
-       hbox = child_vbox->data;
-       child_hbox = gtk_container_get_children (GTK_CONTAINER (hbox));
-       entry = child_hbox->next->data;
+       entry = g_object_get_data (G_OBJECT (dialog), COMMON_FOLDER_DIALOG_ENTRY);
+       picker = g_object_get_data (G_OBJECT (dialog), COMMON_FOLDER_DIALOG_ACCOUNT_PICKER);
        
        parent = TNY_FOLDER_STORE (user_data);
        new_name = gtk_entry_get_text (GTK_ENTRY (entry));
        exists = FALSE;
        
+       if (picker != NULL) {
+
+               parent = g_object_get_data (G_OBJECT (picker), FOLDER_PICKER_CURRENT_FOLDER);
+       }
+
        /* Look for another folder with the same name */
        if (modest_tny_folder_has_subfolder_with_name (parent, 
                                                       new_name,
@@ -650,65 +663,238 @@ on_response (GtkDialog *dialog,
                /* Do not close the dialog */
                g_signal_stop_emission_by_name (dialog, "response");
        }
+
+}
+
+typedef struct _FolderChooserData {
+       TnyFolderStore *store;
+       GtkWidget *dialog;
+} FolderChooserData;
+
+static void
+folder_chooser_activated (ModestFolderView *folder_view,
+                         TnyFolderStore *folder,
+                         FolderChooserData *userdata)
+{
+       userdata->store = folder;
+       gtk_dialog_response (GTK_DIALOG (userdata->dialog), GTK_RESPONSE_OK);
 }
 
+static TnyFolderStore *
+folder_chooser_dialog_run (ModestFolderView *original)
+{
+       GtkWidget *folder_view;
+       FolderChooserData userdata = {NULL, NULL};
+       GtkWidget *pannable;
+       const gchar *visible_id = NULL;
+
+       userdata.dialog = hildon_dialog_new ();
+       pannable = hildon_pannable_area_new ();
+       folder_view = modest_platform_create_folder_view (NULL);
+       modest_folder_view_set_filter (MODEST_FOLDER_VIEW (folder_view),
+                                      MODEST_FOLDER_VIEW_FILTER_CAN_HAVE_FOLDERS);
+
+       modest_folder_view_copy_model (MODEST_FOLDER_VIEW (original), MODEST_FOLDER_VIEW (folder_view));
+
+       visible_id = 
+               modest_folder_view_get_account_id_of_visible_server_account (MODEST_FOLDER_VIEW(original));
+       modest_folder_view_set_account_id_of_visible_server_account (MODEST_FOLDER_VIEW(folder_view),
+                                                                    visible_id);
+
+       gtk_container_add (GTK_CONTAINER (GTK_DIALOG (userdata.dialog)->vbox), pannable);
+       gtk_container_add (GTK_CONTAINER (pannable), folder_view);
+       gtk_widget_show (folder_view);
+       gtk_widget_show (pannable);
+       gtk_widget_show_all (userdata.dialog);
+       gtk_widget_set_size_request (pannable, -1, 320);
+       g_signal_connect (G_OBJECT (folder_view), "folder-activated", 
+                         G_CALLBACK (folder_chooser_activated), 
+                         (gpointer) &userdata);
+
+       gtk_dialog_run (GTK_DIALOG (userdata.dialog));
+       gtk_widget_destroy (userdata.dialog);
+
+       return userdata.store;
+}
+
+static gchar *
+folder_store_get_display_name (TnyFolderStore *store)
+{
+       if (TNY_IS_ACCOUNT (store)) {
+               return g_strdup (tny_account_get_name (TNY_ACCOUNT (store)));
+       } else {
+               gchar *fname;
+               TnyFolderType type = TNY_FOLDER_TYPE_UNKNOWN;
+
+               fname = g_strdup (tny_folder_get_name (TNY_FOLDER (store)));
+               type = tny_folder_get_folder_type (TNY_FOLDER (store));
+               if (modest_tny_folder_is_local_folder (TNY_FOLDER (store)) ||
+                   modest_tny_folder_is_memory_card_folder (TNY_FOLDER (store))) {
+                       type = modest_tny_folder_get_local_or_mmc_folder_type (TNY_FOLDER (store));
+                       if (type != TNY_FOLDER_TYPE_UNKNOWN) {
+                               g_free (fname);
+                               fname = g_strdup (modest_local_folder_info_get_type_display_name (type));
+                       }
+               } else {
+                       /* Sometimes an special folder is reported by the server as
+                          NORMAL, like some versions of Dovecot */
+                       if (type == TNY_FOLDER_TYPE_NORMAL ||
+                           type == TNY_FOLDER_TYPE_UNKNOWN) {
+                               type = modest_tny_folder_guess_folder_type (TNY_FOLDER (store));
+                       }
+               }
+
+               if (type == TNY_FOLDER_TYPE_INBOX) {
+                       g_free (fname);
+                       fname = g_strdup (_("mcen_me_folder_inbox"));
+               }
+               return fname;
+       }
+}
+
+static void
+folder_picker_set_store (GtkButton *button, TnyFolderStore *store)
+{
+       gchar *name;
+
+       if (store == NULL) {
+               g_object_set_data (G_OBJECT (button), FOLDER_PICKER_CURRENT_FOLDER, NULL);
+       } else {
+               g_object_ref (store);
+               g_object_set_data_full (G_OBJECT (button), FOLDER_PICKER_CURRENT_FOLDER, 
+                                       store, (GDestroyNotify) g_object_unref);
+               name = folder_store_get_display_name (store);
+               hildon_button_set_value (HILDON_BUTTON (button), name);
+               g_free (name);
+       }
+}
+
+static void
+folder_picker_clicked (GtkButton *button,
+                      ModestFolderView *folder_view)
+{
+       TnyFolderStore *store;
+
+       store = folder_chooser_dialog_run (folder_view);
+       if (store) {
+               folder_picker_set_store (GTK_BUTTON (button), store);
+       }
+}
+
+static GtkWidget *
+folder_picker_new (ModestFolderView *folder_view, TnyFolderStore *suggested)
+{
+       GtkWidget *button;
+       GdkPixbuf *pixbuf;
+
+       button = hildon_button_new (MODEST_EDITABLE_SIZE,
+                                   HILDON_BUTTON_ARRANGEMENT_HORIZONTAL);
+       pixbuf = modest_platform_get_icon (MODEST_FOLDER_ICON_NORMAL,
+                                          MODEST_ICON_SIZE_SMALL);
+
+       hildon_button_set_image (HILDON_BUTTON (button), 
+                                gtk_image_new_from_pixbuf (pixbuf));
+       hildon_button_set_alignment (HILDON_BUTTON (button), 0.0, 0.5, 1.0, 1.0);
+
+       if (suggested) {
+               folder_picker_set_store (GTK_BUTTON (button), suggested);
+       }
+
+       g_signal_connect (G_OBJECT (button), "clicked", G_CALLBACK (folder_picker_clicked), folder_view);
+
+       return button;
+}
 
 
 static gint
-modest_platform_run_folder_name_dialog (GtkWindow *parent_window,
-                                       TnyFolderStore *parent,
-                                       const gchar *dialog_title,
-                                       const gchar *label_text,
-                                       const gchar *suggested_name,
-                                       gchar **folder_name)
+modest_platform_run_folder_common_dialog (GtkWindow *parent_window,
+                                         TnyFolderStore *suggested_parent,
+                                         const gchar *dialog_title,
+                                         const gchar *label_text,
+                                         const gchar *suggested_name,
+                                         gboolean show_name,
+                                         gboolean show_parent,
+                                         gchar **folder_name,
+                                         TnyFolderStore **parent)
 {
        GtkWidget *accept_btn = NULL; 
-       GtkWidget *dialog, *entry, *label, *hbox;
+       GtkWidget *dialog, *entry = NULL, *label_entry = NULL,  *label_location = NULL, *hbox;
+       GtkWidget *account_picker = NULL;
        GList *buttons = NULL;
        gint result;
+       GtkSizeGroup *sizegroup;
+       ModestFolderView *folder_view;
+       ModestWindow *folder_window;
+       ModestHildon2WindowMgr *window_mgr;
+
+       window_mgr = (ModestHildon2WindowMgr *) modest_runtime_get_window_mgr ();
+       folder_window = modest_hildon2_window_mgr_get_folder_window (window_mgr);
+       g_return_val_if_fail (MODEST_IS_FOLDER_WINDOW (folder_window), GTK_RESPONSE_NONE);
+
+       folder_view = modest_folder_window_get_folder_view (MODEST_FOLDER_WINDOW (folder_window));
 
        /* Ask the user for the folder name */
        dialog = gtk_dialog_new_with_buttons (dialog_title,
                                              parent_window,
                                              GTK_DIALOG_MODAL | GTK_DIALOG_NO_SEPARATOR | GTK_DIALOG_DESTROY_WITH_PARENT,
-                                             _HL("wdgt_bd_done"),
+                                             _FM("ckdg_bd_new_folder_dialog_ok"),
                                              GTK_RESPONSE_ACCEPT,
                                              NULL);
 
        /* Add accept button (with unsensitive handler) */
        buttons = gtk_container_get_children (GTK_CONTAINER (GTK_DIALOG (dialog)->action_area));
        accept_btn = GTK_WIDGET (buttons->data);
-       /* Create label and entry */
-       label = gtk_label_new (label_text);
 
-       entry = hildon_entry_new (HILDON_SIZE_FINGER_HEIGHT | HILDON_SIZE_AUTO_WIDTH);
-       gtk_entry_set_max_length (GTK_ENTRY (entry), 20);
+       sizegroup = gtk_size_group_new (GTK_SIZE_GROUP_HORIZONTAL);
 
-       if (suggested_name)
-               gtk_entry_set_text (GTK_ENTRY (entry), suggested_name);
-       else
-               gtk_entry_set_text (GTK_ENTRY (entry), _("mcen_ia_default_folder_name"));
-       gtk_entry_set_width_chars (GTK_ENTRY (entry),
-                                  MAX (g_utf8_strlen (gtk_entry_get_text (GTK_ENTRY (entry)), -1),
-                                       g_utf8_strlen (_("mcen_ia_default_folder_name"), -1)));
-       gtk_entry_select_region (GTK_ENTRY (entry), 0, -1);
+       if (show_name) {
+               label_entry = gtk_label_new (label_text);
+               entry = hildon_entry_new (HILDON_SIZE_FINGER_HEIGHT | HILDON_SIZE_AUTO_WIDTH);
+               gtk_entry_set_max_length (GTK_ENTRY (entry), 20);
+
+               gtk_misc_set_alignment (GTK_MISC (label_entry), 0.0, 0.5);
+               gtk_size_group_add_widget (sizegroup, label_entry);
+
+               if (suggested_name)
+                       gtk_entry_set_text (GTK_ENTRY (entry), suggested_name);
+               else
+                       gtk_entry_set_text (GTK_ENTRY (entry), _("mcen_ia_default_folder_name"));
+               gtk_entry_set_width_chars (GTK_ENTRY (entry),
+                                          MAX (g_utf8_strlen (gtk_entry_get_text (GTK_ENTRY (entry)), -1),
+                                               g_utf8_strlen (_("mcen_ia_default_folder_name"), -1)));
+               gtk_entry_select_region (GTK_ENTRY (entry), 0, -1);
+       }
+
+       if (show_parent) {
+
+               label_location = gtk_label_new (_FM("ckdg_fi_new_folder_location"));
+
+               gtk_misc_set_alignment (GTK_MISC (label_location), 0.0, 0.5);
+               gtk_size_group_add_widget (sizegroup, label_location);
+
+               account_picker = folder_picker_new (folder_view, suggested_parent);
+       }
+
+       g_object_unref (sizegroup);
 
        /* Connect to the response method to avoid closing the dialog
           when an invalid name is selected*/
        g_signal_connect (dialog,
                          "response",
                          G_CALLBACK (on_response),
-                         parent);
+                         suggested_parent);
 
-       /* Track entry changes */
-       g_signal_connect (entry,
-                         "insert-text",
-                         G_CALLBACK (entry_insert_text),
-                         dialog);
-       g_signal_connect (entry,
-                         "changed",
-                         G_CALLBACK (entry_changed),
-                         dialog);
+       if (show_name) {
+               /* Track entry changes */
+               g_signal_connect (entry,
+                                 "insert-text",
+                                 G_CALLBACK (entry_insert_text),
+                                 dialog);
+               g_signal_connect (entry,
+                                 "changed",
+                                 G_CALLBACK (entry_changed),
+                                 dialog);
+       }
 
 
        /* Some locales like pt_BR need this to get the full window
@@ -716,20 +902,41 @@ modest_platform_run_folder_name_dialog (GtkWindow *parent_window,
        gtk_widget_set_size_request (GTK_WIDGET (dialog), 300, -1);
 
        /* Create the hbox */
-       hbox = gtk_hbox_new (FALSE, 12);
-       gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);
-       gtk_box_pack_start (GTK_BOX (hbox), entry, TRUE, TRUE, 0);
+       if (show_name) {
+               hbox = gtk_hbox_new (FALSE, 12);
+               gtk_box_pack_start (GTK_BOX (hbox), label_entry, FALSE, FALSE, 0);
+               gtk_box_pack_start (GTK_BOX (hbox), entry, TRUE, TRUE, 0);
+
+               /* Add hbox to dialog */
+               gtk_box_pack_start (GTK_BOX(GTK_DIALOG(dialog)->vbox), 
+                                   hbox, FALSE, FALSE, 0);
+               g_object_set_data (G_OBJECT (dialog), COMMON_FOLDER_DIALOG_ENTRY, entry);
+       }
 
-       /* Add hbox to dialog */
-       gtk_box_pack_start (GTK_BOX(GTK_DIALOG(dialog)->vbox), 
-                           hbox, FALSE, FALSE, 0);
+       if (show_parent) {
+               hbox = gtk_hbox_new (FALSE, 12);
+               gtk_box_pack_start (GTK_BOX (hbox), label_location, FALSE, FALSE, 0);
+               gtk_box_pack_start (GTK_BOX (hbox), account_picker, TRUE, TRUE, 0);
+
+               /* Add hbox to dialog */
+               gtk_box_pack_start (GTK_BOX(GTK_DIALOG(dialog)->vbox), 
+                                   hbox, FALSE, FALSE, 0);
+               g_object_set_data (G_OBJECT (dialog), COMMON_FOLDER_DIALOG_ACCOUNT_PICKER, account_picker);
+       }
        modest_window_mgr_set_modal (modest_runtime_get_window_mgr (), 
                                     GTK_WINDOW (dialog), parent_window);
        gtk_widget_show_all (GTK_WIDGET(dialog));
-               
+
        result = gtk_dialog_run (GTK_DIALOG(dialog));
-       if (result == GTK_RESPONSE_ACCEPT)
-               *folder_name = g_strdup (gtk_entry_get_text (GTK_ENTRY (entry)));
+       if (result == GTK_RESPONSE_ACCEPT) {
+               if (show_name)
+                       *folder_name = g_strdup (gtk_entry_get_text (GTK_ENTRY (entry)));
+               if (show_parent) {
+                       *parent = g_object_get_data (G_OBJECT (account_picker), FOLDER_PICKER_CURRENT_FOLDER);
+                       if (*parent)
+                               g_object_ref (*parent);
+               }
+       }
 
        gtk_widget_destroy (dialog);
 
@@ -741,12 +948,15 @@ modest_platform_run_folder_name_dialog (GtkWindow *parent_window,
 
 gint
 modest_platform_run_new_folder_dialog (GtkWindow *parent_window,
-                                      TnyFolderStore *parent_folder,
+                                      TnyFolderStore *suggested_folder,
                                       gchar *suggested_name,
-                                      gchar **folder_name)
+                                      gchar **folder_name,
+                                      TnyFolderStore **parent_folder)
 {
        gchar *real_suggested_name = NULL, *tmp = NULL;
        gint result;
+       ModestTnyAccountStore *acc_store;
+       TnyAccount *account;
 
        if(suggested_name == NULL)
        {
@@ -764,7 +974,7 @@ modest_platform_run_new_folder_dialog (GtkWindow *parent_window,
                        else
                                real_suggested_name = g_strdup_printf (_("mcen_ia_default_folder_name_s"),
                                                                       num_str);
-                       exists = modest_tny_folder_has_subfolder_with_name (parent_folder,
+                       exists = modest_tny_folder_has_subfolder_with_name (suggested_folder,
                                                                            real_suggested_name,
                                                                            TRUE);
 
@@ -781,13 +991,32 @@ modest_platform_run_new_folder_dialog (GtkWindow *parent_window,
                real_suggested_name = suggested_name;
        }
 
+       /* In hildon 2.2 we always suggest the archive folder as parent */
+       acc_store = modest_runtime_get_account_store ();
+       account = modest_tny_account_store_get_mmc_folders_account (acc_store);
+       if (account) {
+               suggested_folder = (TnyFolderStore *)
+                       modest_tny_account_get_special_folder (account, 
+                                                              TNY_FOLDER_TYPE_ARCHIVE);
+               g_object_unref (account);
+               account = NULL;
+       }
+
+       /* If there is not archive folder then fallback to local folders account */ 
+       if (!suggested_folder)
+               suggested_folder = (TnyFolderStore *)
+                       modest_tny_account_store_get_local_folders_account (acc_store);
+
        tmp = g_strconcat (_("mcen_fi_new_folder_name"), ":", NULL);
-       result = modest_platform_run_folder_name_dialog (parent_window, 
-                                                        parent_folder,
-                                                        _("mcen_ti_new_folder"),
-                                                        tmp,
-                                                        real_suggested_name,
-                                                        folder_name);
+       result = modest_platform_run_folder_common_dialog (parent_window, 
+                                                          suggested_folder,
+                                                          _("mcen_ti_new_folder"),
+                                                          tmp,
+                                                          real_suggested_name,
+                                                          TRUE,
+                                                          TRUE,
+                                                          folder_name,
+                                                          parent_folder);
        g_free (tmp);
 
        if (suggested_name == NULL)
@@ -804,12 +1033,15 @@ modest_platform_run_rename_folder_dialog (GtkWindow *parent_window,
 {
        g_return_val_if_fail (TNY_IS_FOLDER_STORE (parent_folder), GTK_RESPONSE_REJECT);
 
-       return modest_platform_run_folder_name_dialog (parent_window, 
-                                                      parent_folder,
-                                                      _HL("ckdg_ti_rename_folder"),
-                                                      _HL("ckdg_fi_rename_name"),
-                                                      suggested_name,
-                                                      folder_name);
+       return modest_platform_run_folder_common_dialog (parent_window, 
+                                                        parent_folder,
+                                                        _HL("ckdg_ti_rename_folder"),
+                                                        _HL("ckdg_fi_rename_name"),
+                                                        suggested_name,
+                                                        TRUE,
+                                                        FALSE,
+                                                        folder_name,
+                                                        NULL);
 }
 
 
@@ -1225,14 +1457,15 @@ modest_platform_on_new_headers_received (TnyList *header_list,
                g_object_unref (datetime_formatter);
 
                display_address = tny_header_dup_from (header);
-               modest_text_utils_get_display_address (display_address); /* string is changed in-place */
-               
+               /* string is changed in-place */
+               modest_text_utils_get_display_address (display_address);
+
                summary = g_strdup_printf ("%s - %s", display_date, display_address);
                str = tny_header_dup_subject (header);
                notification = hildon_notification_new (summary,
                                                        str,
                                                        "qgn_list_messagin",
-                                                       "email.arrive");
+                                                       "email-message");
                g_free (str);
                /* Create the message URL */
                str = tny_header_dup_uid (header);
@@ -1653,7 +1886,7 @@ modest_platform_run_certificate_confirmation_dialog (const gchar* server_name,
 
        gchar *question = g_strdup_printf (_("mcen_nc_unknown_certificate"),
                                           server_name);
-       
+
        /* We use GTK_RESPONSE_APPLY because we want the button in the
           middle of OK and CANCEL the same as the browser does for
           example. With GTK_RESPONSE_HELP the view button is aligned
@@ -1665,52 +1898,53 @@ modest_platform_run_certificate_confirmation_dialog (const gchar* server_name,
                _HL("wdgt_bd_view"),          GTK_RESPONSE_APPLY,   /* abusing this... */
                _HL("wdgt_bd_no"), GTK_RESPONSE_CANCEL,
                NULL, NULL);
-       
+
        g_signal_connect (G_OBJECT(note), "response", 
                          G_CALLBACK(on_cert_dialog_response),
                          (gpointer) certificate);
-       
+
        response = gtk_dialog_run(GTK_DIALOG(note));
 
        on_destroy_dialog (note);
        g_free (question);
-       
+
        return response == GTK_RESPONSE_OK;
 }
 
 gboolean
-modest_platform_run_alert_dialog (const gchar* prompt, 
+modest_platform_run_alert_dialog (const gchar* prompt,
                                  gboolean is_question)
-{      
-       ModestWindow *main_win; 
+{
+       ModestWindow *top_win;
+       HildonWindowStack *stack;
 
-       if (!modest_window_mgr_main_window_exists (modest_runtime_get_window_mgr())) {
-               g_warning ("%s:\n'%s'\ndon't show dialogs if there's no main window;"
-                          " assuming 'Cancel' for questions, 'Ok' otherwise", prompt, __FUNCTION__);
-               return is_question ? FALSE : TRUE;
+       stack = hildon_window_stack_get_default ();
+       top_win = MODEST_WINDOW (hildon_window_stack_peek (stack));
+
+       if (!top_win) {
+               g_warning ("%s: don't show dialogs if there's no window shown; assuming 'Cancel'",
+                          __FUNCTION__);
+               return FALSE;
        }
 
-       main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (), FALSE);
-       g_return_val_if_fail (main_win, FALSE); /* should not happen */
-       
        gboolean retval = TRUE;
        if (is_question) {
-               /* The Tinymail documentation says that we should show Yes and No buttons, 
+               /* The Tinymail documentation says that we should show Yes and No buttons,
                 * when it is a question.
                 * Obviously, we need tinymail to use more specific error codes instead,
                 * so we know what buttons to show. */
-               GtkWidget *dialog = GTK_WIDGET (hildon_note_new_confirmation (GTK_WINDOW (main_win), 
+               GtkWidget *dialog = GTK_WIDGET (hildon_note_new_confirmation (GTK_WINDOW (top_win), 
                                                                              prompt));
                modest_window_mgr_set_modal (modest_runtime_get_window_mgr (),
-                                            GTK_WINDOW (dialog), GTK_WINDOW (main_win));
-               
+                                            GTK_WINDOW (dialog), GTK_WINDOW (top_win));
+
                const int response = gtk_dialog_run (GTK_DIALOG (dialog));
                retval = (response == GTK_RESPONSE_YES) || (response == GTK_RESPONSE_OK);
-               
-               on_destroy_dialog (dialog);             
+
+               on_destroy_dialog (dialog);
        } else {
                /* Just show the error text and use the default response: */
-               modest_platform_run_information_dialog (GTK_WINDOW (main_win), 
+               modest_platform_run_information_dialog (GTK_WINDOW (top_win), 
                                                        prompt, FALSE);
        }
        return retval;
@@ -2214,9 +2448,26 @@ modest_platform_create_move_to_dialog (GtkWindow *parent_window,
 TnyList *
 modest_platform_get_list_to_move (ModestWindow *window)
 {
-       ModestHeaderView *header_view;
+       if (MODEST_IS_HEADER_WINDOW (window)) {
+               ModestHeaderView *header_view;
+
+               header_view = modest_header_window_get_header_view (MODEST_HEADER_WINDOW (window));
 
-       header_view = modest_header_window_get_header_view (MODEST_HEADER_WINDOW (window));
+               return modest_header_view_get_selected_headers (header_view);
+       } else if (MODEST_IS_FOLDER_WINDOW (window)) {
+               ModestFolderView *folder_view;
+               TnyFolderStore *selected_folder;
+               TnyList *list;
 
-       return modest_header_view_get_selected_headers (header_view);
+               list = TNY_LIST (tny_simple_list_new ());
+               folder_view = modest_folder_window_get_folder_view (MODEST_FOLDER_WINDOW (window));
+               selected_folder = modest_folder_view_get_selected (folder_view);
+               if (selected_folder) {
+                       tny_list_prepend (list, G_OBJECT (selected_folder));
+                       g_object_unref (selected_folder);
+               }
+               return list;
+       } else {
+               return NULL;
+       }
 }