[pve-devel] r5116 - pve-common/trunk

[svn-commits at proxmox.com]

Author: dietmar
Date: 2010-09-10 13:25:58 +0000 (Fri, 10 Sep 2010)
New Revision: 5116

Modified:
   pve-common/trunk/RPCEnvironment.pm
Log:
new get_user() accessor


Modified: pve-common/trunk/RPCEnvironment.pm
===================================================================
--- pve-common/trunk/RPCEnvironment.pm	2010-09-10 13:03:10 UTC (rev 5115)
+++ pve-common/trunk/RPCEnvironment.pm	2010-09-10 13:25:58 UTC (rev 5116)
@@ -55,4 +55,12 @@
     $self->{user} = $user;
 }
 
+sub get_user {
+    my ($self) = @_;
+
+    die "user name not set\n" if !$self->{user};
+
+    return $self->{user};
+}
+
 1;