diff options
Diffstat (limited to 'local/user.pm')
-rw-r--r-- | local/user.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/local/user.pm b/local/user.pm index 8e134a8..5b727ba 100644 --- a/local/user.pm +++ b/local/user.pm @@ -21,6 +21,13 @@ sub new return $self; } +sub obj +{ + my $self = shift; + return local::db::owner->retrieve($self->{id}); +} + + sub get_name { my $self = shift; |