aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiguel de Icaza <miguel@gnu.org>2001-01-12 12:45:01 +0800
committerMiguel de Icaza <miguel@src.gnome.org>2001-01-12 12:45:01 +0800
commitb3cda1c4faa911ab3c974bb584e5e16e4cf02202 (patch)
treef749fd74f486a0eb26d5ef36509f5925e33d9577
parent834325ad2b1b59d1e27dc20fe4922cb41c3717b5 (diff)
downloadgsoc2013-evolution-b3cda1c4faa911ab3c974bb584e5e16e4cf02202.tar.gz
gsoc2013-evolution-b3cda1c4faa911ab3c974bb584e5e16e4cf02202.tar.zst
gsoc2013-evolution-b3cda1c4faa911ab3c974bb584e5e16e4cf02202.zip
Guess the default MAIL value for MBOX and Maildir files.
2001-01-11 Miguel de Icaza <miguel@gnu.org> * mail-config-druid.c (incoming_type_changed): Guess the default MAIL value for MBOX and Maildir files. svn path=/trunk/; revision=7430
-rw-r--r--mail/ChangeLog3
-rw-r--r--mail/mail-config-druid.c8
2 files changed, 11 insertions, 0 deletions
diff --git a/mail/ChangeLog b/mail/ChangeLog
index 4341f962f8..a9f14d2d44 100644
--- a/mail/ChangeLog
+++ b/mail/ChangeLog
@@ -1,5 +1,8 @@
2001-01-11 Miguel de Icaza <miguel@gnu.org>
+ * mail-config-druid.c (incoming_type_changed): Guess the default
+ MAIL value for MBOX and Maildir files.
+
* mail-callbacks.c (configure_mail): Force finalization of the
function before returning fixing the FIXME that was there.
diff --git a/mail/mail-config-druid.c b/mail/mail-config-druid.c
index cc0413fe03..a68f298969 100644
--- a/mail/mail-config-druid.c
+++ b/mail/mail-config-druid.c
@@ -450,6 +450,14 @@ incoming_type_changed (GtkWidget *widget, gpointer user_data)
if (provider->url_flags & CAMEL_URL_ALLOW_PATH) {
if (!dwidget)
dwidget = GTK_WIDGET (druid->incoming_path);
+
+ if (!strcmp (provider->protocol, "mbox") || !strcmp (provider->protocol, "maildir")){
+ if (getenv ("MAIL"))
+ gtk_entry_set_text (druid->incoming_path, getenv ("MAIL"));
+ } else {
+ gtk_entry_set_text (druid->incoming_path, "");
+ }
+
gtk_widget_set_sensitive (GTK_WIDGET (druid->incoming_path), TRUE);
gtk_widget_set_sensitive (label, TRUE);
} else {