From 805db01a4b6e969fd416def17fd0ae4fb418af4c Mon Sep 17 00:00:00 2001
From: Julian Blake Kongslie <jblake@omgwallhack.org>
Date: Thu, 18 Mar 2010 13:46:33 -0700
Subject: Fix bug in username detection in libpiny.
---
usr/src/libpiny/debian/changelog | 5 +++--
usr/src/libpiny/lib/Piny/Environment.pm | 2 +-
2 files changed, 4 insertions(+), 3 deletions(-)
(limited to 'usr/src/libpiny')
diff --git a/usr/src/libpiny/debian/changelog b/usr/src/libpiny/debian/changelog
index 9d6c07d..f7d4449 100644
--- a/usr/src/libpiny/debian/changelog
+++ b/usr/src/libpiny/debian/changelog
@@ -1,10 +1,11 @@
-libpiny-perl (0.2-2) unstable; urgency=low
+libpiny-perl (0.3-1) unstable; urgency=low
* Fix some build-depends stuff.
* Add group membership manipulation.
* Add some more type constraints.
+ * Fix a bug in the username detection.
- -- Julian Blake Kongslie <jblake@omgwallhack.org> Thu, 18 Mar 2010 13:28:35 -0700
+ -- Julian Blake Kongslie <jblake@omgwallhack.org> Thu, 18 Mar 2010 13:45:52 -0700
libpiny-perl (0.2-1) unstable; urgency=low
diff --git a/usr/src/libpiny/lib/Piny/Environment.pm b/usr/src/libpiny/lib/Piny/Environment.pm
index 4430362..586cce3 100644
--- a/usr/src/libpiny/lib/Piny/Environment.pm
+++ b/usr/src/libpiny/lib/Piny/Environment.pm
@@ -28,7 +28,7 @@ sub _build_user {
} elsif ( defined $ENV{"UID"} ) {
return Piny::User->new( uid => $ENV{"UID"} );
} elsif ( defined $ENV{"USER"} ) {
- return Piny::User->new( username => $ENV{"USERNAME"} );
+ return Piny::User->new( username => $ENV{"USER"} );
} else {
return Piny::User->new( uid => $< );
};
--
cgit v1.2.3