#!/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}{\${ATHENA_USER}.mail.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; s%^(suggest-fullname=).*$%${1}Athena Suggestions%m or die; s%^(suggest-address=).*$%${1}suggest\@mit.edu%m or die; s%^(local-fullname=).*$%${1}Athena Consultants%m or die; s%^(local-address=).*$%${1}olc-mail\@mit.edu%m or die; s%^(url-viewers=).*$%${1}/usr/bin/sensible-browser%m or die; s%^(folder-collections=).*$%${1}"MIT Mail" {\${ATHENA_USER}.mail.mit.edu/ssl/imap/user=\${ATHENA_USER}}INBOX.[],\n\t"Old MH Mail" #mh/[],\n\t"Local Pine Mail" ~/mail/[]%m or die; s%^(sendmail-path=).*$%${1}/usr/lib/debathena-msmtp -t%m or die; s%^(rsh-open-timeout=).*$%${1}0%m or die; s%^(ssh-open-timeout=).*$%${1}0%m or die; s%^(new-version-threshold=).*$%\% (Athena hack: 'z' should be lexically greater than any pine version.)\n${1}z%m or die; s%^(ldap-servers=).*$%${1}ldap-too.mit.edu:389 "/base=dc=mit,dc=edu"%m or die;