summaryrefslogtreecommitdiff
path: root/usr/src/libpiny/lib/Piny/Environment.pm
diff options
context:
space:
mode:
authorBryan Bishop <kanzure@gmail.com>2010-10-29 19:46:24 -0500
committerBryan Bishop <kanzure@gmail.com>2010-10-29 19:46:24 -0500
commit7786ce2a332b0eba4b3ca7c57f906a32e8715da3 (patch)
tree5a9fe32b69a93f41ae2ac82a50788fe50c0d86fb /usr/src/libpiny/lib/Piny/Environment.pm
parent413373be9ab30eb21b564cdc180cb2dcda77bfeb (diff)
downloadpiny-code-7786ce2a332b0eba4b3ca7c57f906a32e8715da3.tar.gz
piny-code-7786ce2a332b0eba4b3ca7c57f906a32e8715da3.zip
Starting repo cleanup to make this not so awful
Diffstat (limited to 'usr/src/libpiny/lib/Piny/Environment.pm')
-rw-r--r--usr/src/libpiny/lib/Piny/Environment.pm45
1 files changed, 0 insertions, 45 deletions
diff --git a/usr/src/libpiny/lib/Piny/Environment.pm b/usr/src/libpiny/lib/Piny/Environment.pm
deleted file mode 100644
index 06416b8..0000000
--- a/usr/src/libpiny/lib/Piny/Environment.pm
+++ /dev/null
@@ -1,45 +0,0 @@
-# Copyright © 2010 Julian Blake Kongslie <jblake@omgwallhack.org>
-# Licensed under the BSD 3-clause license.
-
-use strict;
-use warnings;
-
-package Piny::Environment;
-
-use MooseX::Singleton;
-use MooseX::StrictConstructor;
-
-use Piny::User;
-
-# Attributes
-
-has 'user' =>
- ( is => 'ro'
- , isa => 'Piny::User'
- , lazy_build => 1
- , init_arg => undef
- );
-
-# Builder methods
-
-sub _build_user {
- my ( $s ) = @_;
-
- if ( defined $ENV{"SUDO_UID"} ) {
- return Piny::User->new( uid => $ENV{"SUDO_UID"} );
- } elsif ( defined $ENV{"SUDO_USER"} ) {
- return Piny::User->new( name => $ENV{"SUDO_USER"} );
- } elsif ( defined $ENV{"UID"} ) {
- return Piny::User->new( uid => $ENV{"UID"} );
- } elsif ( defined $ENV{"USER"} ) {
- return Piny::User->new( name => $ENV{"USER"} );
- } else {
- return Piny::User->new( uid => $< );
- };
-};
-
-# Moose boilerplate
-
-__PACKAGE__->meta->make_immutable( inline_constructor => 0 );
-
-1;