use var

diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm
index 5530251..82b1ef1 100644 (file)
--- a/FS/FS/svc_domain.pm
+++ b/FS/FS/svc_domain.pm
@@ -4,7 +4,7 @@ use strict;
 use vars qw( @ISA $whois_hack $conf $smtpmachine
   $tech_contact $from $to @nameservers @nameserver_ips @template
   @mxmachines @nsmachines $soadefaultttl $soaemail $soaexpire $soamachine
 use vars qw( @ISA $whois_hack $conf $smtpmachine
   $tech_contact $from $to @nameservers @nameserver_ips @template
   @mxmachines @nsmachines $soadefaultttl $soaemail $soaexpire $soamachine

-  $soarefresh $soaretry
+  $soarefresh $soaretry $qshellmachine

 );
 use Carp;
 use Mail::Internet;
 );
 use Carp;
 use Mail::Internet;


@@ -533,7 +533,7 @@ sub submit_internic {
 
 =head1 VERSION
 
 
 =head1 VERSION
 

-$Id: svc_domain.pm,v 1.17 2001-08-20 11:04:38 ivan Exp $
+$Id: svc_domain.pm,v 1.18 2001-08-20 13:10:31 ivan Exp $

 
 =head1 BUGS
 
 
 =head1 BUGS