freeside/FS/FS svc_acct.pm,1.157,1.158

[ivan]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv10693

Modified Files:
	svc_acct.pm 
Log Message:
fix deletion of accounts connected to virtual hosts

Index: svc_acct.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_acct.pm,v
retrieving revision 1.157
retrieving revision 1.158
diff -u -d -r1.157 -r1.158
--- svc_acct.pm	26 May 2004 13:02:31 -0000	1.157
+++ svc_acct.pm	16 Jun 2004 23:59:43 -0000	1.158
@@ -465,7 +465,7 @@
     if qsearch( 'svc_forward', { 'dstsvc' => $self->svcnum } );
 
   return "Can't delete an account with (svc_www) web service!"
-    if qsearch( 'svc_www', { 'usersvc' => $self->usersvc } );
+    if qsearch( 'svc_www', { 'usersvc' => $self->svcnum } );
 
   # what about records in session ? (they should refer to history table)