[evolution/express2: 2/5] add stock close button

[Michael Meeks <michael src gnome org>]

commit 46cf8be3f3bb9f2287f60f847873288d91b7abeb
Author: Michael Meeks <michael meeks novell com>
Date:   Wed Apr 14 20:14:40 2010 +0100

    add stock close button

 shell/e-shell-window.c |   17 +++++++++++++++++
 1 files changed, 17 insertions(+), 0 deletions(-)
---
diff --git a/shell/e-shell-window.c b/shell/e-shell-window.c
index 62c39fe..c135a76 100644
--- a/shell/e-shell-window.c
+++ b/shell/e-shell-window.c
@@ -409,6 +409,23 @@ shell_window_construct_toolbar (EShellWindow *shell_window)
 	gtk_toolbar_set_show_arrow (GTK_TOOLBAR (toolbar), FALSE);
 	gtk_box_pack_start (GTK_BOX (box), toolbar, FALSE, FALSE, 0);
 
+	if (e_shell_get_meego_mode (shell_window->priv->shell) &&
+	    e_shell_get_small_screen_mode (shell_window->priv->shell)) {
+		GtkWidget *close_button, *image;
+
+		close_button = gtk_button_new ();
+		gtk_widget_set_name (close_button, "MeeGoCloseButton");
+		image = gtk_image_new_from_icon_name ("window-close-hover",
+						      GTK_ICON_SIZE_DIALOG);
+		gtk_container_add (GTK_CONTAINER (close_button), image);
+		gtk_activatable_set_related_action
+			(GTK_ACTIVATABLE (close_button),
+			 gtk_action_group_get_action (ACTION_GROUP (SHELL),
+						      "close"));
+		gtk_widget_show_all (close_button);
+		gtk_box_pack_end (GTK_BOX (box), close_button, FALSE, FALSE, 0);
+	}
+
 	return box;
 }