[24097] in Source-Commits
/svn/athena r23700 - in trunk/athena/bin/mitmailrename: . debian
daemon@ATHENA.MIT.EDU (Evan Broder)
Thu Apr 2 21:11:54 2009
X-Barracuda-Envelope-From: broder@mit.edu
Date: Thu, 2 Apr 2009 21:11:29 -0400
From: Evan Broder <broder@MIT.EDU>
Message-Id: <200904030111.n331BTUx019638@drugstore.mit.edu>
To: source-commits@mit.edu
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Author: broder
Date: 2009-04-02 21:11:29 -0400 (Thu, 02 Apr 2009)
New Revision: 23700
Modified:
trunk/athena/bin/mitmailrename/debian/changelog
trunk/athena/bin/mitmailrename/mitmailrename.pl
Log:
In mitmailrename:
* Try $ATHENA_USER before using $USER.
Modified: trunk/athena/bin/mitmailrename/debian/changelog
===================================================================
--- trunk/athena/bin/mitmailrename/debian/changelog 2009-04-03 01:11:15 UTC (rev 23699)
+++ trunk/athena/bin/mitmailrename/debian/changelog 2009-04-03 01:11:29 UTC (rev 23700)
@@ -1,3 +1,9 @@
+debathena-mitmailrename (10.0.1-0debathena1) unstable; urgency=low
+
+ * Try $ATHENA_USER before using $USER.
+
+ -- Evan Broder <broder@mit.edu> Thu, 02 Apr 2009 21:02:58 -0400
+
debathena-mitmailrename (10.0.0-0debathena2) unstable; urgency=low
* Change DEB_AUTO_UPDATE_AUTOCONF to 2.50, not 1.
Modified: trunk/athena/bin/mitmailrename/mitmailrename.pl
===================================================================
--- trunk/athena/bin/mitmailrename/mitmailrename.pl 2009-04-03 01:11:15 UTC (rev 23699)
+++ trunk/athena/bin/mitmailrename/mitmailrename.pl 2009-04-03 01:11:29 UTC (rev 23700)
@@ -35,7 +35,7 @@
usage "Please specify an existing and new mailbox names" if @ARGV != 2;
-my $username = $ENV{'USER'} || getlogin || (getpwuid($<))[0] ||
+my $username = $ENV{'ATHENA_USER'} || $ENV{'USER'} || getlogin || (getpwuid($<))[0] ||
errorout "Cannot determine user name";
unless ($opt_host) {
