[28362] in Source-Commits

home help back first fref pref prev next nref lref last post

alpine-config commit: Add a trailing "INBOX" to Exchange inbox-path

daemon@ATHENA.MIT.EDU (Jonathan D Reed)
Wed Jul 30 15:47:45 2014

Date: Wed, 30 Jul 2014 15:47:37 -0400
From: Jonathan D Reed <jdreed@MIT.EDU>
Message-Id: <201407301947.s6UJlbdD003063@drugstore.mit.edu>
To: source-commits@MIT.EDU

https://github.com/mit-athena/alpine-config/commit/df77531afba0f6cce1913d7b89f6c092ab6dc35f
commit df77531afba0f6cce1913d7b89f6c092ab6dc35f
Author: Jonathan Reed <jdreed@mit.edu>
Date:   Wed Jul 30 15:43:57 2014 -0400

    Add a trailing "INBOX" to Exchange inbox-path
    
    We need to add a trailing "INBOX" to the inbox-path for exchange,
    otherwise Pine is incapable of displaying subfolders of Inbox,
    which is what migrated people get.  We still do _NOT_ want it
    in folder-collections, because Exchange _does_ have toplevel
    folders (e.g. Contacts), unlike Cyrus.

 debian/changelog                     |    8 ++++++++
 debian/transform_pine.conf.debathena |    2 +-
 debian/update-pine-config            |    2 +-
 3 files changed, 10 insertions(+), 2 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 082b67b..a1b9ac6 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,11 @@
+debathena-alpine-config (1.21) unstable; urgency=low
+
+  * Add "INBOX" to the end of the inbox-path for the Exchange
+    configuration, otherwise you can't access subfolders of Inbox (Trac:
+    #1519)
+
+ -- Jonathan Reed <jdreed@mit.edu>  Wed, 30 Jul 2014 15:43:44 -0400
+
 debathena-alpine-config (1.20) unstable; urgency=low
 
   * Default to EXCHANGE configuration (Trac: #1438)
diff --git a/debian/transform_pine.conf.debathena b/debian/transform_pine.conf.debathena
index 7c9e1d9..6662340 100755
--- a/debian/transform_pine.conf.debathena
+++ b/debian/transform_pine.conf.debathena
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -0p
 s%^(user-domain=).*$%${1}mit.edu%m or die;
 s%^(nntp-server=).*$%${1}news.mit.edu%m or die;
-s%^(inbox-path=).*$%${1}{imap.exchange.mit.edu/ssl/imap/user=\${ATHENA_USER}}%m or die;
+s%^(inbox-path=).*$%${1}{imap.exchange.mit.edu/ssl/imap/user=\${ATHENA_USER}}INBOX%m or die;
 s%^(feature-list=).*$%${1}enable-mail-check-cue,\n\tsave-will-quote-leading-froms,\n\tenable-full-header-cmd%m or die;
 s%^(bugs-fullname=).*$%${1}Athena Bugs%m or die;
 s%^(bugs-address=).*$%${1}bugs\@mit.edu%m or die;
diff --git a/debian/update-pine-config b/debian/update-pine-config
index b171161..100b108 100755
--- a/debian/update-pine-config
+++ b/debian/update-pine-config
@@ -31,7 +31,7 @@ to_exchange() {
     if [ -e ~/.pinerc ]; then
 	cp ~/.pinerc ~/.pinerc.bak.$$
 	perl -0pie - ~/.pinerc <<'EOF'
-s%^(inbox-path=).*$%${1}{imap.exchange.mit.edu/ssl/imap/user=\${ATHENA_USER}}%m or die;
+s%^(inbox-path=).*$%${1}{imap.exchange.mit.edu/ssl/imap/user=\${ATHENA_USER}}INBOX%m or die;
 
 s%^(folder-collections=).*$%${1}"MIT Mail" {imap.exchange.mit.edu/ssl/imap/user=\${ATHENA_USER}}[],\n\t"Old MH Mail" #mh/[],\n\t"Local Pine Mail" ~/mail/[]%m or die;
 EOF

home help back first fref pref prev next nref lref last post