X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fsvc_www.pm;h=6c276a1986ddc9423f9a4fd8c8bd340a3f61cff9;hp=d7a42c8ae8286673223f7c3260d24e954bbbb4ce;hb=c2146ae32fdef80049abfa13098db2d45f3ebdd5;hpb=5c5006bb59066f59270cdb5b916c1f3d857e5782 diff --git a/FS/FS/svc_www.pm b/FS/FS/svc_www.pm index d7a42c8ae..6c276a198 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 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) should be defined. An FS::cust_svc record will be created and inserted. +Currently available options are: I + +If I 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; @@ -234,7 +241,8 @@ sub check { return "Unknown usersvc (svc_acct.svcnum): ". $self->usersvc unless qsearchs('svc_acct', { 'svcnum' => $self->usersvc } ); - ''; #no error + $self->SUPER::check; + } =item domain_record