X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fh_svc_www.pm;h=20002214bd84ddee3cc585c322f09d667b7f8dd3;hb=0b019cbcd4f285cf76a4aa5d7143a4154748ae5f;hp=2a3b6dca6d0c8fbce9df59d41b97df539aa10616;hpb=7fdbfcef21985e7c8455929eb0ad70c0863ac47b;p=freeside.git diff --git a/FS/FS/h_svc_www.pm b/FS/FS/h_svc_www.pm index 2a3b6dca6..20002214b 100644 --- a/FS/FS/h_svc_www.pm +++ b/FS/FS/h_svc_www.pm @@ -33,6 +33,7 @@ sub domain_record { carp 'Called FS::h_svc_www->domain_record on svcnum ' . $self->svcnum if $DEBUG; + $_[0] ||= $self->history_date; my $domain_record = qsearchs( 'h_domain_record', { 'recnum' => $self->recnum },