This commit was manufactured by cvs2svn to create tag 'freeside_2_1_1'.

[freeside.git] / FS / FS / access_user.pm

diff --git a/FS/FS/access_user.pm b/FS/FS/access_user.pm
index 075733a..72e9140 100644 (file)
--- a/FS/FS/access_user.pm
+++ b/FS/FS/access_user.pm
@@ -132,8 +132,9 @@ sub insert {
 
 sub htpasswd_kludge {
   my $self = shift;
-
-  return '' if $self->is_system_user;
+  
+  #awful kludge to skip setting htpasswd for fs_* users
+  return '' if $self->username =~ /^fs_/;
 
   unshift @_, '-c' unless -e $htpasswd_file;
   if ( 
@@ -511,25 +512,6 @@ sub default_customer_view {
 
 }
 
-=item is_system_user
-
-Returns true if this user has the name of a known system account.  These 
-users will not appear in the htpasswd file and can't have passwords set.
-
-=cut
-
-sub is_system_user {
-  my $self = shift;
-  return grep { $_ eq $self->username } ( qw(
-    fs_queue
-    fs_daily
-    fs_selfservice
-    fs_signup
-    fs_bootstrap
-    fs_selfserv
-) );
-}
-
 =back
 
 =head1 BUGS