[freeside] svc_domain errors

[Stephen D. Bechard]

I have just updated all of my freeside to the latest CVS
and everything seems to be running fine again. :)
Thanks,
Steve

> I see that quite a few files were updated.
> I will check them out and see where I end up.
> Thanks,
> Steve
>
> > well, since bind export is batch, not real-time, just need something
> > empty... i checked in some export updates which might help
> >
> > On Wed, Jun 26, 2002 at 01:07:50PM -0400, Stephen D. Bechard wrote:
> > > I just tried to add a new domain after the new part_export
> > > features have been enabled. It worked fine before, but now
> > > I am getting an error related to a FS/part_export/bind.pm
> > > that doesn't exists. I didn't find it anywhere on my system
> > > and I didn't see it on the CVS tree, is this something that
> > > still needs to be created?
> > >
> > > Thanks,
> > > Steve
> > >
> > > Below is that Error that I am receiving:
> > >
> > > Errors Output
> > >   1.. Can't locate FS/part_export/bind.pm in @INC (@INC contains:
> > > /usr/local/lib/site_perl/5.00503/i386-freebsd
> /usr/libdata/perl/5.00503/mach
> > > /usr/libdata/perl/5.00503
> /usr/local/lib/perl5/site_perl/5.005/i386-freebsd
> > > /usr/local/lib/perl5/site_perl/5.005 . /usr/local/
/usr/local/lib/perl)
> at
> > > (eval 81) line 1. BEGIN failed--compilation aborted at (eval 81) line
1.
> ,
> > > /usr/local/lib/perl5/site_perl/5.005/Apache/ASP.pm line 1545
> > > Debug Output
> > >   1.. Can't locate FS/part_export/bind.pm in @INC (@INC contains:
> > > /usr/local/lib/site_perl/5.00503/i386-freebsd
> /usr/libdata/perl/5.00503/mach
> > > /usr/libdata/perl/5.00503
> /usr/local/lib/perl5/site_perl/5.005/i386-freebsd
> > > /usr/local/lib/perl5/site_perl/5.005 . /usr/local/
/usr/local/lib/perl)
> at
> > > (eval 81) line 1. BEGIN failed--compilation aborted at (eval 81) line
1.
> ,
> > > /usr/local/lib/perl5/site_perl/5.005/Apache/ASP.pm line 1545
> > > ASP to Perl Script
> > >
> > >   -: package
> > > Apache::ASP::Compiles::_usr_local_etc_freeside_asp_global_global_asa;
;;
> sub
> > >
>
Apache::ASP::Compiles::_usr_local_etc_freeside_asp_global_global_asa::__ASP_
> > > _usr_local_www_data_aspdocs_edit_process_svc_domain_cgixINL {  ;;
> package
> > > Apache::ASP::Compiles::_usr_local_etc_freeside_asp_global_global_asa;
;;
> no
> > > strict;;use vars qw($Application $Session $Response $Server
> $Request);;use
> > > lib qw(/usr/local/etc/freeside/asp-global/);;;
> > >   -: #line 1 svc_domain.cgi
> > >   1: ;
> > >   2:
> > >   3: #remove this to actually test the domains!
> > >   4: $FS::svc_domain::whois_hack = 1;
> > >   5:
> > >   6: $cgi->param('svcnum') =~ /^(\d*)$/ or die "Illegal svcnum!";
> > >   7: my $svcnum = $1;
> > >   8:
> > >   9: my $new = new FS::svc_domain ( {
> > >  10:   map {
> > >  11:     $_, scalar($cgi->param($_));
> > >  12:   #} qw(svcnum pkgnum svcpart domain action purpose)
> > >  13:   } ( fields('svc_domain'), qw( pkgnum svcpart action purpose ) )
> > >  14: } );
> > >  15:
> > >  16: my $error = '';
> > >  17: if ($cgi->param('svcnum')) {
> > >  18:   $error="Can't modify a domain!";
> > >  19: } else {
> > >  20:   $error=$new->insert;
> > >  21:   $svcnum=$new->svcnum;
> > >  22: }
> > >  23:
> > >  24: if ($error) {
> > >  25:   $cgi->param('error', $error);
> > >  26:   print $cgi->redirect(popurl(2). "svc_domain.cgi?".
> > > $cgi->query_string );
> > >  27: } else {
> > >  28:   print $cgi->redirect(popurl(3). "view/svc_domain.cgi?$svcnum");
> > >  29: }
> > >  30:
> > >  31: ; ;;no lib qw(/usr/local/etc/freeside/asp-global/); ;; }
> > >
> > >
> > >
> >
> > --
> > _ivan
> >
>
>