From: ivan <ivan>
Date: Wed, 16 Jun 2004 23:59:43 +0000 (+0000)
Subject: fix deletion of accounts connected to virtual hosts
X-Git-Tag: BEFORE_FINAL_MASONIZE~1032
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c4ed19db84cc71ef13ded9f86ba413411b5c05f6

fix deletion of accounts connected to virtual hosts
---

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 6ea30437a..f66c715cd 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -465,7 +465,7 @@ sub delete {
     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)