[24090] in Source-Commits
/svn/athena r23694 - in trunk/athena/bin/mailusage: . debian
daemon@ATHENA.MIT.EDU (Evan Broder)
Thu Apr 2 21:10:26 2009
Date: Thu, 2 Apr 2009 21:10:05 -0400
From: Evan Broder <broder@MIT.EDU>
Message-Id: <200904030110.n331A5fS019402@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:10:05 -0400 (Thu, 02 Apr 2009)
New Revision: 23694
Modified:
trunk/athena/bin/mailusage/debian/changelog
trunk/athena/bin/mailusage/mailusage.pl
Log:
In mailusage:
* Try $ATHENA_USER before using $USER.
Modified: trunk/athena/bin/mailusage/debian/changelog
===================================================================
--- trunk/athena/bin/mailusage/debian/changelog 2009-04-03 01:09:51 UTC (rev 23693)
+++ trunk/athena/bin/mailusage/debian/changelog 2009-04-03 01:10:05 UTC (rev 23694)
@@ -1,3 +1,9 @@
+debathena-mailusage (10.0.1-0debathena1) unstable; urgency=low
+
+ * Try $ATHENA_USER before using $USER.
+
+ -- Evan Broder <broder@mit.edu> Thu, 02 Apr 2009 21:03:42 -0400
+
debathena-mailusage (10.0.0-0debathena2) unstable; urgency=low
* Change DEB_AUTO_UPDATE_AUTOCONF to 2.50, not 1.
Modified: trunk/athena/bin/mailusage/mailusage.pl
===================================================================
--- trunk/athena/bin/mailusage/mailusage.pl 2009-04-03 01:09:51 UTC (rev 23693)
+++ trunk/athena/bin/mailusage/mailusage.pl 2009-04-03 01:10:05 UTC (rev 23694)
@@ -38,7 +38,7 @@
# Parse the command line arguments.
my %opts;
getopts('dh:m:nrs', \%opts) || usage;
-my $username = shift @ARGV || $ENV{'USER'} || getlogin || (getpwuid($<))[0] ||
+my $username = shift @ARGV || $ENV{'ATHENA_USER'} || $ENV{'USER'} || getlogin || (getpwuid($<))[0] ||
errorout "Cannot determine user name";
usage "Too many arguments" if @ARGV > 0;