2013-01-23 [colin] 3.9.0cvs59
[claws.git] / src / editgroup.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2012 Hiroyuki Yamamoto and the Claws Mail team
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  * 
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #include "claws-features.h"
23 #endif
24
25 #include "defs.h"
26
27 #include <glib.h>
28 #include <glib/gi18n.h>
29 #include <gdk/gdkkeysyms.h>
30
31 #include "addressbook.h"
32 #include "addressitem.h"
33 #include "addrbook.h"
34 #include "addritem.h"
35
36 #include "mgutils.h"
37
38 #include "prefs_common.h"
39
40 #include "alertpanel.h"
41 #include "inputdialog.h"
42 #include "manage_window.h"
43 #include "gtkutils.h"
44
45 #define ADDRESSBOOK_GUESS_FOLDER_NAME   "NewFolder"
46 #define ADDRESSBOOK_GUESS_GROUP_NAME    "NewGroup"
47
48 typedef enum {
49         GROUP_COL_NAME    = 0,
50         GROUP_COL_EMAIL   = 1,
51         GROUP_COL_REMARKS = 2
52 } GroupEditEMailColumnPos;
53
54 #define GROUP_N_COLS          3
55 #define GROUP_COL_WIDTH_NAME  140
56 #define GROUP_COL_WIDTH_EMAIL 120
57
58 static struct _GroupEdit_dlg {
59         GtkWidget *window;
60         GtkWidget *ok_btn;
61         GtkWidget *cancel_btn;
62         GtkWidget *statusbar;
63         gint status_cid;
64
65         /* Basic data tab */
66         GtkWidget *entry_name;
67         GtkCMCList *clist_group;
68         GtkCMCList *clist_avail;
69
70         GHashTable *hashEMail;
71
72 } groupeditdlg;
73
74
75 static gchar *_edit_group_dfl_message_ = NULL;
76
77 static void edit_group_status_show( gchar *msg ) {
78         if( groupeditdlg.statusbar != NULL ) {
79                 gtk_statusbar_pop( GTK_STATUSBAR(groupeditdlg.statusbar), groupeditdlg.status_cid );
80                 if( msg ) {
81                         gtk_statusbar_push( GTK_STATUSBAR(groupeditdlg.statusbar), groupeditdlg.status_cid, msg );
82                 }
83         }
84 }
85
86 static void edit_group_ok(GtkWidget *widget, gboolean *cancelled) {
87         gchar *sName;
88         gboolean errFlag = TRUE;
89
90         sName = gtk_editable_get_chars( GTK_EDITABLE(groupeditdlg.entry_name), 0, -1 );
91         if( sName ) {
92                 g_strstrip( sName );
93                 if( *sName != '\0' ) {
94                         gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), sName );
95                         *cancelled = FALSE;
96                         gtk_main_quit();
97                         errFlag = FALSE;
98                 }
99         }
100         if( errFlag ) {
101                 edit_group_status_show( _( "A Group Name must be supplied." ) );
102         }
103         g_free( sName );
104 }
105
106 static void edit_group_cancel(GtkWidget *widget, gboolean *cancelled) {
107         *cancelled = TRUE;
108         gtk_main_quit();
109 }
110
111 static gint edit_group_delete_event(GtkWidget *widget, GdkEventAny *event, gboolean *cancelled) {
112         *cancelled = TRUE;
113         gtk_main_quit();
114         return TRUE;
115 }
116
117 static gboolean edit_group_key_pressed(GtkWidget *widget, GdkEventKey *event, gboolean *cancelled) {
118         if (event && event->keyval == GDK_KEY_Escape) {
119                 *cancelled = TRUE;
120                 gtk_main_quit();
121         }
122         return FALSE;
123 }
124
125 static gchar *edit_group_format_item_clist( ItemPerson *person, ItemEMail *email ) {
126         gchar *str = NULL;
127         gchar *aName = ADDRITEM_NAME(email);
128         if( aName == NULL || *aName == '\0' ) return str;
129         if( person ) {
130                 str = g_strdup_printf( "%s - %s", ADDRITEM_NAME(person), aName );
131         }
132         else {
133                 str = g_strdup( aName );
134         }
135         return str;
136 }
137
138 static gint edit_group_clist_add_email( GtkCMCList *clist, ItemEMail *email ) {
139         ItemPerson *person = ( ItemPerson * ) ADDRITEM_PARENT(email);
140         gchar *str = edit_group_format_item_clist( person, email );
141         gchar *text[ GROUP_N_COLS ];
142         gint row;
143         if( str ) {
144                 text[ GROUP_COL_NAME ] = addressbook_set_col_name_guard(str);
145         }
146         else {
147                 text[ GROUP_COL_NAME ] = addressbook_set_col_name_guard(ADDRITEM_NAME(person));
148         }
149         text[ GROUP_COL_EMAIL   ] = email->address;
150         text[ GROUP_COL_REMARKS ] = email->remarks;
151
152         row = gtk_cmclist_append( clist, text );
153         gtk_cmclist_set_row_data( clist, row, email );
154         return row;
155 }
156
157 static void edit_group_load_clist( GtkCMCList *clist, GList *listEMail ) {
158         GList *node = listEMail;
159         gtk_cmclist_freeze(clist);
160         while( node ) {
161                 ItemEMail *email = node->data;
162                 edit_group_clist_add_email( clist, email );
163                 node = g_list_next( node );
164         }
165         gtk_cmclist_thaw(clist);
166 }
167
168
169 static void edit_group_move_email( GtkCMCList *clist_from, GtkCMCList *clist_to, GtkCMCTreeNode *node ) {
170         ItemEMail *email = gtk_cmctree_node_get_row_data( GTK_CMCTREE(clist_from), node );
171         GtkCMCTreeNode *next = gtkut_ctree_node_next(GTK_CMCTREE(clist_from), node);
172         GtkCMCTreeNode *prev = gtkut_ctree_node_prev(GTK_CMCTREE(clist_from), node);
173         int rrow = 0;
174         if( email ) {
175                 gtk_cmctree_remove_node(GTK_CMCTREE(clist_from), node);
176                 rrow = edit_group_clist_add_email( clist_to, email );
177                 gtk_cmclist_select_row( clist_to, rrow, 0 );
178                 if (next)
179                         gtk_cmctree_select(GTK_CMCTREE(clist_from), next);
180                 else if (prev)
181                         gtk_cmctree_select(GTK_CMCTREE(clist_from), prev);
182         }
183 }
184
185 static void edit_group_to_group( GtkWidget *widget, gpointer data ) {
186         GList *selected = g_list_copy(GTK_CMCLIST(groupeditdlg.clist_avail)->selection);
187         /* Clear the selected rows on destination clist */
188         gtk_cmclist_freeze(groupeditdlg.clist_avail);
189         gtk_cmclist_freeze(groupeditdlg.clist_group);
190         gtk_cmclist_unselect_all(groupeditdlg.clist_group);
191         while (selected) {
192                 edit_group_move_email( groupeditdlg.clist_avail,
193                                         groupeditdlg.clist_group, GTK_CMCTREE_NODE(selected->data) );
194                 selected = selected->next;
195         }
196         g_list_free(selected);
197         gtk_cmclist_thaw(groupeditdlg.clist_avail);
198         gtk_cmclist_thaw(groupeditdlg.clist_group);
199 }
200
201 static void edit_group_to_avail( GtkWidget *widget, gpointer data ) {
202         GList *selected = g_list_copy(GTK_CMCLIST(groupeditdlg.clist_group)->selection);
203         gtk_cmclist_freeze(groupeditdlg.clist_avail);
204         gtk_cmclist_freeze(groupeditdlg.clist_group);
205         gtk_cmclist_unselect_all(groupeditdlg.clist_avail);
206         while (selected) {
207                 edit_group_move_email( groupeditdlg.clist_group,
208                                         groupeditdlg.clist_avail, GTK_CMCTREE_NODE(selected->data) );
209                 selected = selected->next;
210         }
211         g_list_free(selected);
212         gtk_cmclist_thaw(groupeditdlg.clist_avail);
213         gtk_cmclist_thaw(groupeditdlg.clist_group);
214 }
215
216 static gboolean edit_group_list_group_button( GtkCMCList *clist, GdkEventButton *event, gpointer data ) {
217         if( ! event ) return FALSE;
218
219         if( event->button == 1 ) {
220                 if( event->type == GDK_2BUTTON_PRESS ) {
221                         edit_group_to_avail( NULL, NULL );
222                 }
223         }
224         return FALSE;
225 }
226
227 static gboolean edit_group_list_avail_button( GtkCMCList *clist, GdkEventButton *event, gpointer data ) {
228         if( ! event ) return FALSE;
229
230         if( event->button == 1 ) {
231                 if( event->type == GDK_2BUTTON_PRESS ) {
232                         edit_group_to_group( NULL, NULL );
233                 }
234         }
235         return FALSE;
236 }
237
238 static gint edit_group_list_compare_func( GtkCMCList *clist, gconstpointer ptr1, gconstpointer ptr2 ) {
239         GtkCMCell *cell1 = ((GtkCMCListRow *)ptr1)->cell;
240         GtkCMCell *cell2 = ((GtkCMCListRow *)ptr2)->cell;
241         gchar *name1 = NULL, *name2 = NULL;
242         if( cell1 ) name1 = cell1->u.text;
243         if( cell2 ) name2 = cell2->u.text;
244         if( ! name1 ) return ( name2 != NULL );
245         if( ! name2 ) return -1;
246         return g_utf8_collate( name1, name2 );
247 }
248
249 static void addressbook_edit_group_size_allocate_cb(GtkWidget *widget,
250                                          GtkAllocation *allocation)
251 {
252         cm_return_if_fail(allocation != NULL);
253
254         prefs_common.addressbookeditgroupwin_width = allocation->width;
255         prefs_common.addressbookeditgroupwin_height = allocation->height;
256 }
257
258 static void addressbook_edit_group_create( gboolean *cancelled ) {
259         GtkWidget *window;
260         GtkWidget *vbox;
261         GtkWidget *hbbox;
262         GtkWidget *ok_btn;
263         GtkWidget *cancel_btn;
264         GtkWidget *hsbox;
265         GtkWidget *statusbar;
266
267         GtkWidget *hboxg;
268         GtkWidget *table;
269         GtkWidget *label;
270         GtkWidget *entry_name;
271         GtkWidget *hboxl;
272         GtkWidget *vboxl;
273         GtkWidget *hboxh;
274
275         GtkWidget *clist_swin;
276         GtkWidget *clist_group;
277         GtkWidget *clist_avail;
278
279         GtkWidget *buttonGroup;
280         GtkWidget *buttonAvail;
281         gint top;
282
283         gchar *titles[ GROUP_N_COLS ];
284         gint i;
285
286         static GdkGeometry geometry;
287
288         titles[ GROUP_COL_NAME    ] = _( "Name" );
289         titles[ GROUP_COL_EMAIL   ] = _("Email Address");
290         titles[ GROUP_COL_REMARKS ] = _("Remarks");
291
292         window = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "editgroup");
293         gtk_container_set_border_width(GTK_CONTAINER(window), 0);
294         gtk_window_set_title(GTK_WINDOW(window), _("Edit Group Data"));
295         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
296         g_signal_connect(G_OBJECT(window), "delete_event",
297                          G_CALLBACK(edit_group_delete_event),
298                          cancelled);
299         g_signal_connect(G_OBJECT(window), "key_press_event",
300                          G_CALLBACK(edit_group_key_pressed),
301                          cancelled);
302         g_signal_connect(G_OBJECT(window), "size_allocate",
303                          G_CALLBACK(addressbook_edit_group_size_allocate_cb), NULL);
304
305         vbox = gtk_vbox_new( FALSE, 6 );
306         gtk_container_set_border_width(GTK_CONTAINER(vbox), BORDER_WIDTH);
307         gtk_widget_show( vbox );
308         gtk_container_add( GTK_CONTAINER( window ), vbox );
309
310         /* Group area */
311         hboxg = gtk_hbox_new( FALSE, 0 );
312         gtk_box_pack_start(GTK_BOX(vbox), hboxg, FALSE, FALSE, 0);
313
314         /* Data entry area */
315         table = gtk_table_new( 1, 3, FALSE);
316         gtk_box_pack_start(GTK_BOX(hboxg), table, TRUE, TRUE, 0);
317         gtk_container_set_border_width( GTK_CONTAINER(table), 4 );
318         gtk_table_set_row_spacings(GTK_TABLE(table), 0);
319         gtk_table_set_col_spacings(GTK_TABLE(table), 4);
320
321         /* First row */
322         top = 0;
323         label = gtk_label_new(_("Group Name"));
324         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
325         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
326
327         entry_name = gtk_entry_new();
328         gtk_table_attach(GTK_TABLE(table), entry_name, 1, 2, top, (top + 1), GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
329
330         /* List area */
331         hboxl = gtk_hbox_new( FALSE, 6 );
332         gtk_container_set_border_width( GTK_CONTAINER(hboxl), 8 );
333         gtk_box_pack_start(GTK_BOX(vbox), hboxl, TRUE, TRUE, 0);
334
335         /* Group list */
336         vboxl = gtk_vbox_new( FALSE, 0 );
337         gtk_box_pack_start(GTK_BOX(hboxl), vboxl, TRUE, TRUE, 0);
338
339         hboxh = gtk_hbox_new( FALSE, 0 );
340         gtk_container_set_border_width( GTK_CONTAINER(hboxh), 4 );
341         gtk_box_pack_start(GTK_BOX(vboxl), hboxh, FALSE, FALSE, 0);
342         label = gtk_label_new(_("Addresses in Group"));
343         gtk_box_pack_start(GTK_BOX(hboxh), label, TRUE, TRUE, 0);
344         buttonAvail = gtk_button_new_from_stock(GTK_STOCK_REMOVE);
345         gtk_box_pack_end(GTK_BOX(hboxh), buttonAvail, FALSE, FALSE, 0);
346
347         clist_swin = gtk_scrolled_window_new( NULL, NULL );
348         gtk_box_pack_start(GTK_BOX(vboxl), clist_swin, TRUE, TRUE, 0);
349         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(clist_swin),
350                                        GTK_POLICY_AUTOMATIC,
351                                        GTK_POLICY_AUTOMATIC);
352
353         clist_group = gtk_sctree_new_with_titles( GROUP_N_COLS, 0, titles );
354         gtk_container_add( GTK_CONTAINER(clist_swin), clist_group );
355         gtk_cmctree_set_line_style(GTK_CMCTREE(clist_group), GTK_CMCTREE_LINES_NONE);
356         gtk_cmctree_set_expander_style(GTK_CMCTREE(clist_group),
357                              GTK_CMCTREE_EXPANDER_TRIANGLE);
358         gtk_sctree_set_stripes(GTK_SCTREE(clist_group), prefs_common.use_stripes_in_summaries);
359         gtk_cmclist_set_selection_mode( GTK_CMCLIST(clist_group), GTK_SELECTION_MULTIPLE );
360         gtk_cmclist_set_column_width( GTK_CMCLIST(clist_group), GROUP_COL_NAME, GROUP_COL_WIDTH_NAME );
361         gtk_cmclist_set_column_width( GTK_CMCLIST(clist_group), GROUP_COL_EMAIL, GROUP_COL_WIDTH_EMAIL );
362         gtk_cmclist_set_compare_func( GTK_CMCLIST(clist_group), edit_group_list_compare_func );
363         gtk_cmclist_set_auto_sort( GTK_CMCLIST(clist_group), TRUE );
364
365         for( i = 0; i < GROUP_N_COLS; i++ )
366                 gtkut_widget_set_can_focus(GTK_CMCLIST(clist_group)->column[i].button, FALSE);
367
368         /* Available list */
369         vboxl = gtk_vbox_new( FALSE, 0 );
370         gtk_box_pack_start(GTK_BOX(hboxl), vboxl, TRUE, TRUE, 0);
371
372         hboxh = gtk_hbox_new( FALSE, 0 );
373         gtk_container_set_border_width( GTK_CONTAINER(hboxh), 4 );
374         gtk_box_pack_start(GTK_BOX(vboxl), hboxh, FALSE, FALSE, 0);
375         buttonGroup = gtk_button_new_from_stock(GTK_STOCK_ADD);
376         gtk_box_pack_start(GTK_BOX(hboxh), buttonGroup, FALSE, FALSE, 0);
377         label = gtk_label_new(_("Available Addresses"));
378         gtk_box_pack_end(GTK_BOX(hboxh), label, TRUE, TRUE, 0);
379
380         clist_swin = gtk_scrolled_window_new( NULL, NULL );
381         gtk_box_pack_start(GTK_BOX(vboxl), clist_swin, TRUE, TRUE, 0);
382         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(clist_swin),
383                                        GTK_POLICY_AUTOMATIC,
384                                        GTK_POLICY_AUTOMATIC);
385
386         clist_avail = gtk_sctree_new_with_titles( GROUP_N_COLS, 0, titles );
387         gtk_container_add( GTK_CONTAINER(clist_swin), clist_avail );
388         gtk_cmctree_set_line_style(GTK_CMCTREE(clist_avail), GTK_CMCTREE_LINES_NONE);
389         gtk_cmctree_set_expander_style(GTK_CMCTREE(clist_avail),
390                              GTK_CMCTREE_EXPANDER_TRIANGLE);
391         gtk_cmclist_set_selection_mode( GTK_CMCLIST(clist_avail), GTK_SELECTION_MULTIPLE );
392         gtk_cmclist_set_column_width( GTK_CMCLIST(clist_avail), GROUP_COL_NAME, GROUP_COL_WIDTH_NAME );
393         gtk_cmclist_set_column_width( GTK_CMCLIST(clist_avail), GROUP_COL_EMAIL, GROUP_COL_WIDTH_EMAIL );
394         gtk_cmclist_set_compare_func( GTK_CMCLIST(clist_avail), edit_group_list_compare_func );
395         gtk_cmclist_set_auto_sort( GTK_CMCLIST(clist_avail), TRUE );
396
397         for( i = 0; i < GROUP_N_COLS; i++ )
398                 gtkut_widget_set_can_focus(GTK_CMCLIST(clist_avail)->column[i].button, FALSE);
399
400         /* Status line */
401         hsbox = gtk_hbox_new(FALSE, 0);
402         gtk_box_pack_end(GTK_BOX(vbox), hsbox, FALSE, FALSE, BORDER_WIDTH);
403         statusbar = gtk_statusbar_new();
404         gtk_box_pack_start(GTK_BOX(hsbox), statusbar, TRUE, TRUE, BORDER_WIDTH);
405
406         /* Button panel */
407         gtkut_stock_button_set_create(&hbbox, &cancel_btn, GTK_STOCK_CANCEL,
408                                       &ok_btn, GTK_STOCK_OK,
409                                       NULL, NULL);
410         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
411         gtk_widget_grab_default(ok_btn);
412
413         g_signal_connect(G_OBJECT(ok_btn), "clicked",
414                          G_CALLBACK(edit_group_ok), cancelled);
415         g_signal_connect(G_OBJECT(cancel_btn), "clicked",
416                          G_CALLBACK(edit_group_cancel), cancelled);
417
418         gtk_widget_show_all(vbox);
419
420         /* Event handlers */
421         g_signal_connect( G_OBJECT(buttonGroup), "clicked",
422                           G_CALLBACK( edit_group_to_group ), NULL );
423         g_signal_connect( G_OBJECT(buttonAvail), "clicked",
424                           G_CALLBACK( edit_group_to_avail ), NULL );
425         g_signal_connect(G_OBJECT(clist_avail), "button_press_event",
426                          G_CALLBACK(edit_group_list_avail_button), NULL);
427         g_signal_connect(G_OBJECT(clist_group), "button_press_event",
428                          G_CALLBACK(edit_group_list_group_button), NULL);
429
430         if (!geometry.min_height) {
431                 geometry.min_width = 580;
432                 geometry.min_height = 340;
433         }
434
435         gtk_window_set_geometry_hints(GTK_WINDOW(window), NULL, &geometry,
436                                       GDK_HINT_MIN_SIZE);
437         gtk_widget_set_size_request(window,
438                                         prefs_common.addressbookeditgroupwin_width,
439                                     prefs_common.addressbookeditgroupwin_height);
440
441         groupeditdlg.window     = window;
442         groupeditdlg.ok_btn     = ok_btn;
443         groupeditdlg.cancel_btn = cancel_btn;
444         groupeditdlg.statusbar  = statusbar;
445         groupeditdlg.status_cid = gtk_statusbar_get_context_id( GTK_STATUSBAR(statusbar), "Edit Group Dialog" );
446
447         groupeditdlg.entry_name  = entry_name;
448         groupeditdlg.clist_group = GTK_CMCLIST( clist_group );
449         groupeditdlg.clist_avail = GTK_CMCLIST( clist_avail );
450
451         if( ! _edit_group_dfl_message_ ) {
452                 _edit_group_dfl_message_ = _( "Move Email Addresses to or from Group with arrow buttons" );
453         }
454 }
455
456 /*
457 * Return list of email items.
458 */
459 static GList *edit_group_build_email_list() {
460         GtkCMCList *clist = GTK_CMCLIST(groupeditdlg.clist_group);
461         GList *listEMail = NULL;
462         ItemEMail *email;
463         gint row = 0;
464         while( (email = gtk_cmclist_get_row_data( clist, row )) ) {
465                 listEMail = g_list_append( listEMail, email );
466                 row++;
467         }
468         return listEMail;
469 }
470
471 /*
472 * Edit group.
473 * Enter: abf    Address book.
474 *        folder Parent folder for group (or NULL if adding to root folder). Argument is
475 *               only required for new objects).
476 *        group  Group to edit, or NULL for a new group object.
477 * Return: Edited object, or NULL if cancelled.
478 */
479 ItemGroup *addressbook_edit_group( AddressBookFile *abf, ItemFolder *parent, ItemGroup *group ) {
480         static gboolean cancelled;
481         GList *listEMail = NULL;
482         gchar *name;
483
484         if (!groupeditdlg.window)
485                 addressbook_edit_group_create(&cancelled);
486         gtk_widget_grab_focus(groupeditdlg.ok_btn);
487         gtk_widget_grab_focus(groupeditdlg.entry_name);
488         gtk_widget_show(groupeditdlg.window);
489         manage_window_set_transient(GTK_WINDOW(groupeditdlg.window));
490         gtk_window_set_modal(GTK_WINDOW(groupeditdlg.window), TRUE);
491         /* Clear all fields */
492         edit_group_status_show( "" );
493         gtk_cmclist_clear( GTK_CMCLIST(groupeditdlg.clist_group) );
494         gtk_cmclist_clear( GTK_CMCLIST(groupeditdlg.clist_avail) );
495
496         if( group ) {
497                 if( ADDRITEM_NAME(group) )
498                         gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), ADDRITEM_NAME(group) );
499                 edit_group_load_clist( groupeditdlg.clist_group, group->listEMail );
500                 gtk_window_set_title( GTK_WINDOW(groupeditdlg.window), _("Edit Group Details"));
501         }
502         else {
503                 gtk_window_set_title( GTK_WINDOW(groupeditdlg.window), _("Add New Group"));
504                 gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), ADDRESSBOOK_GUESS_GROUP_NAME );
505         }
506
507         listEMail = addrbook_get_available_email_list( abf, group );
508         edit_group_load_clist( groupeditdlg.clist_avail, listEMail );
509         mgu_clear_list( listEMail );
510         listEMail = NULL;
511         gtk_cmclist_select_row( groupeditdlg.clist_group, 0, 0 );
512         gtk_cmclist_select_row( groupeditdlg.clist_avail, 0, 0 );
513
514         edit_group_status_show( _edit_group_dfl_message_ );
515
516         gtk_main();
517         gtk_widget_hide( groupeditdlg.window );
518         gtk_window_set_modal(GTK_WINDOW(groupeditdlg.window), FALSE);
519         if( cancelled ) {
520                 return NULL;
521         }
522
523         listEMail = edit_group_build_email_list();
524         if( group ) {
525                 /* Update email list */
526                 addrbook_update_group_list( abf, group, listEMail );
527         }
528         else {
529                 /* Create new person and email list */
530                 group = addrbook_add_group_list( abf, parent, listEMail );
531         }
532         name = gtk_editable_get_chars( GTK_EDITABLE(groupeditdlg.entry_name), 0, -1 );
533         addritem_group_set_name( group, name );
534         g_free( name );
535
536         listEMail = NULL;
537         return group;
538 }
539
540 /*
541 * Edit folder.
542 * Enter: abf    Address book.
543 *        parent Parent folder for folder (or NULL if adding to root folder). Argument is
544 *               only required for new objects).
545 *        folder Folder to edit, or NULL for a new folder object.
546 * Return: Edited object, or NULL if cancelled.
547 */
548 ItemFolder *addressbook_edit_folder( AddressBookFile *abf, ItemFolder *parent, ItemFolder *folder ) {
549         gchar *name = NULL;
550
551         if( folder ) {
552                 name = g_strdup( ADDRITEM_NAME(folder) );
553                 name = input_dialog( _("Edit folder"), _("Input the new name of folder:"), name );
554         }
555         else {
556                 name = input_dialog( _("New folder"),
557                                 _("Input the name of new folder:"),
558                                 _(ADDRESSBOOK_GUESS_FOLDER_NAME) );
559         }
560         if( ! name ) return NULL;
561         g_strstrip( name );
562         if( *name == '\0' ) {
563                 g_free( name );
564                 return NULL;
565         }
566         if( folder ) {
567                 if( strcmp( name, ADDRITEM_NAME(folder) ) == 0 ) {
568                         g_free( name );
569                         return NULL;
570                 }
571         }
572
573         if( ! folder ) {
574                 folder = addrbook_add_new_folder( abf, parent );
575         }
576         addritem_folder_set_name( folder, name );
577         g_free( name );
578         return folder;
579 }
580
581 /*
582 * End of Source.
583 */
584