aboutsummaryrefslogtreecommitdiffstats
path: root/shell
diff options
context:
space:
mode:
Diffstat (limited to 'shell')
-rw-r--r--shell/ChangeLog5
-rw-r--r--shell/main.c59
2 files changed, 64 insertions, 0 deletions
diff --git a/shell/ChangeLog b/shell/ChangeLog
index 107ff4941d..395510285b 100644
--- a/shell/ChangeLog
+++ b/shell/ChangeLog
@@ -1,3 +1,8 @@
+2000-05-18 Dan Winship <danw@helixcode.com>
+
+ * main.c (new_view_idle_cb): add development_warning (moved from
+ mail component)
+
2000-05-16 Ettore Perazzoli <ettore@helixcode.com>
* e-storage-set-view.c: Get rid of the `ICON_WIDTH' and
diff --git a/shell/main.c b/shell/main.c
index 27c1fc8400..e8885ecfc9 100644
--- a/shell/main.c
+++ b/shell/main.c
@@ -83,6 +83,62 @@ init_corba (int *argc, char **argv)
#endif /* USING_OAF */
+static void
+development_warning ()
+{
+ GtkWidget *label, *warning_dialog;
+
+ warning_dialog = gnome_dialog_new (
+ "Evolution 0.0",
+ GNOME_STOCK_BUTTON_OK,
+ NULL);
+
+ label = gtk_label_new (
+ _(
+ "Hi. Thanks for taking the time to download this preview release of\n"
+ "the Evolution groupware suite.\n"
+ "\n"
+ "The Evolution team has worked hard to make Evolution as robust,\n"
+ "extensible, pretty, fast and well-suited to heavy internet users as\n"
+ "possible. And we're very tired. But we're not done -- not yet.\n"
+ "\n"
+ "As you explore Evolution, please understand that most of our work has\n"
+ "been focused on the backend engine which drives the entire system and\n"
+ "not on the user interface. We are just cresting the hill now, though,\n"
+ "and will be pouring most of our love and attention into the UI from\n"
+ "here out. But at least you know that you're not using demoware.\n"
+ "\n"
+ "So, time for the nerdy disclaimer. Evolution will: crash, lose your\n"
+ "mail, leave stray processes running, consume 100% CPU, race, lock,\n"
+ "send HTML mail to random mailing lists, and embarass you in front of\n"
+ "your friends and co-workers. Use at your own risk.\n"
+ "\n"
+ "We hope that you enjoy the results of our hard work, and we eagerly\n"
+ "await your contributions!\n"
+ ));
+ gtk_label_set_justify (GTK_LABEL (label), GTK_JUSTIFY_LEFT);
+ gtk_widget_show (label);
+
+ gtk_box_pack_start (GTK_BOX (GNOME_DIALOG (warning_dialog)->vbox),
+ label, TRUE, TRUE, 0);
+
+ label = gtk_label_new (
+ _(
+ "Thanks\n"
+ "The Evolution Team\n"
+ ));
+ gtk_label_set_justify(GTK_LABEL(label), GTK_JUSTIFY_RIGHT);
+ gtk_misc_set_alignment(GTK_MISC(label), 1, .5);
+ gtk_widget_show (label);
+
+ gtk_box_pack_start (GTK_BOX (GNOME_DIALOG (warning_dialog)->vbox),
+ label, TRUE, TRUE, 0);
+
+ gnome_dialog_run (GNOME_DIALOG (warning_dialog));
+
+ gtk_object_destroy (GTK_OBJECT (warning_dialog));
+}
+
static gint
new_view_idle_cb (gpointer data)
{
@@ -91,6 +147,9 @@ new_view_idle_cb (gpointer data)
shell = E_SHELL (data);
e_shell_new_view (shell, STARTUP_URI);
+ if (!getenv ("EVOLVE_ME_HARDER"))
+ development_warning ();
+
return FALSE;
}