summaryrefslogtreecommitdiff
path: root/FS/FS/svc_www.pm
diff options
context:
space:
mode:
authorivan <ivan>2004-03-03 13:42:08 +0000
committerivan <ivan>2004-03-03 13:42:08 +0000
commitc65b166b6e2ebdac5c2eb2e8336ebd1a4087f77c (patch)
tree7f6a3564456dda24800bdae6f4da52f1b4a04c2c /FS/FS/svc_www.pm
parentf4247c22a77543afa76f4bc81281bdda71f776cf (diff)
fix welcome emails being sent to signup server declined accounts, closes: Bug#743
Diffstat (limited to 'FS/FS/svc_www.pm')
-rw-r--r--FS/FS/svc_www.pm11
1 files changed, 9 insertions, 2 deletions
diff --git a/FS/FS/svc_www.pm b/FS/FS/svc_www.pm
index 7e89083..6c276a1 100644
--- a/FS/FS/svc_www.pm
+++ b/FS/FS/svc_www.pm
@@ -74,7 +74,7 @@ points to. You can ask the object for a copy with the I<hash> method.
sub table { 'svc_www'; }
-=item insert
+=item insert [ , OPTION => VALUE ... ]
Adds this record to the database. If there is an error, returns the error,
otherwise returns false.
@@ -82,6 +82,13 @@ otherwise returns false.
The additional fields pkgnum and svcpart (see L<FS::cust_svc>) should be
defined. An FS::cust_svc record will be created and inserted.
+Currently available options are: I<depend_jobnum>
+
+If I<depend_jobnum> is set (to a scalar jobnum or an array reference of
+jobnums), all provisioning jobs will have a dependancy on the supplied
+jobnum(s) (they will not run until the specific job(s) complete(s)).
+
+
=cut
sub insert {
@@ -124,7 +131,7 @@ sub insert {
$self->recnum($domain_record->recnum);
}
- $error = $self->SUPER::insert;
+ $error = $self->SUPER::insert(@_);
if ( $error ) {
$dbh->rollback if $oldAutoCommit;
return $error;