use FS::cust_svc;
use FS::domain_record;
use FS::svc_acct;
-use FS::SSH qw(ssh);
+use Net::SSH qw(ssh);
-@ISA = qw(svc_Common);
+@ISA = qw( FS::svc_Common );
#ask FS::UID to run this stuff for us later
$FS::UID::callback{'FS::svc_www'} = sub {
=item svcnum - primary key
-=item recnum - DNS `A' record corresponding to this web virtual host. (see L<FS::domain_record))
+=item recnum - DNS `A' record corresponding to this web virtual host. (see L<FS::domain_record>)
=item usersvc - account (see L<FS::svc_acct>) corresponding to this web virtual host.
my $x = $self->setfixed;
return $x unless ref($x);
- my $part_svc = $x;
+ #my $part_svc = $x;
my $error =
$self->ut_numbern('svcnum')
=head1 VERSION
-$Id: svc_www.pm,v 1.1 2000-02-03 05:16:52 ivan Exp $
+$Id: svc_www.pm,v 1.6 2001-09-06 20:41:59 ivan Exp $
=head1 BUGS
L<FS::svc_Common>, L<FS::Record>, L<FS::domain_record>, L<FS::cust_svc>,
L<FS::part_svc>, L<FS::cust_pkg>, schema.html from the base documentation.
-=head1 HISTORY
-
-$Log: svc_www.pm,v $
-Revision 1.1 2000-02-03 05:16:52 ivan
-beginning of DNS and Apache support
-
-
=cut
1;