X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Faccess_user_session.pm;h=7845d92aa5e9bd3f8ad263867f5d7ed995974358;hp=df112f9840217edcaf3bf1fcbc40d55c70be9983;hb=674cb2d9d7105f4cc2871539b2e9f7088cdaa750;hpb=e62544064299324ab04abae64cc33afef12a24aa

diff --git a/FS/FS/access_user_session.pm b/FS/FS/access_user_session.pm
index df112f984..7845d92aa 100644
--- a/FS/FS/access_user_session.pm
+++ b/FS/FS/access_user_session.pm
@@ -1,9 +1,7 @@
 package FS::access_user_session;
+use base qw( FS::Record );
 
 use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearchs ); # qsearch );
-use FS::access_user;
 
 =head1 NAME
 
@@ -114,13 +112,6 @@ sub check {
 
 Returns the employee (see L<FS::access_user>) for this session.
 
-=cut
-
-sub access_user {
-  my $self = shift;
-  qsearchs('access_user', { 'usernum' => $self->usernum });
-}
-
 =item touch_last_date
 
 =cut