[24090] in Source-Commits

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

/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;


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