Wrapper to lookup local geni user.

33f4a831 · Leigh B Stoller · 980015b9 · 33f4a831
Commit 33f4a831 authored Jul 08, 2014 by Leigh B Stoller
Hide whitespace changes
Inline Side-by-side

Showing with 12 additions and 0 deletions

protogeni/lib/GeniUser.pm.in protogeni/lib/GeniUser.pm.in +12 -0

No files found.
--- a/protogeni/lib/GeniUser.pm.in
+++ b/protogeni/lib/GeniUser.pm.in
@@ -727,8 +727,20 @@ use GeniDB;
 use GeniUser;
 use GeniHRN;
 use GeniCertificate;
+use User;
 use overload ('""' => 'Stringify');

+sub Lookup($$)
+{
+    my ($class, $uid) = @_;
+
+    my $user = User->Lookup($uid);
+    return undef
+	if (!defined($user));
+    
+    return GeniUser::LocalUser->Create($user);
+}
+
 #
 # Create a wrapper, with the same access names.
 #