1 files changed, 0 insertions, 67 deletions
diff --git a/FS/FS/CurrentUser.pm b/FS/FS/CurrentUser.pm
deleted file mode 100644
index bcd337d..0000000
--- a/FS/FS/CurrentUser.pm
+++ /dev/null
@@ -1,67 +0,0 @@
-package FS::CurrentUser;
-
-use vars qw($CurrentUser $upgrade_hack);
-
-#not at compile-time, circular dependancey causes trouble
-#use FS::Record qw(qsearchs);
-#use FS::access_user;
-
-$upgrade_hack = 0;
-
-=head1 NAME
-
-FS::CurrentUser - Package representing the current user
-
-=head1 SYNOPSIS
-
-=head1 DESCRIPTION
-
-=cut
-
-sub load_user {
-  my( $class, $user ) = @_; #, $pass
-
-  if ( $upgrade_hack ) {
-    return $CurrentUser = new FS::CurrentUser::BootstrapUser;
-  }
-
-  #return "" if $user =~ /^fs_(queue|selfservice)$/;
-
-  #not the best thing in the world...
-  eval "use FS::Record qw(qsearchs);";
-  die $@ if $@;
-  eval "use FS::access_user;";
-  die $@ if $@;
-
-  $CurrentUser = qsearchs('access_user', {
-    'username' => $user,
-    #'_password' =>
-    'disabled' => '',
-  } );
-
-  die "unknown user: $user" unless $CurrentUser; # or bad password
-
-  $CurrentUser;
-}
-
-=head1 BUGS
-
-Creepy crawlies
-
-=head1 SEE ALSO
-
-=cut
-
-package FS::CurrentUser::BootstrapUser;
-
-sub new {
-  my $proto = shift;
-  my $class = ref($proto) || $proto;
-  my $self = {};
-  bless ($self, $class);
-}
-
-sub AUTOLOAD { 1 };
-
-1;
-