projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
initial checkin
[freeside.git]
/
fs_signup
/
fs_signup_server
diff --git
a/fs_signup/fs_signup_server
b/fs_signup/fs_signup_server
index
56d616b
..
1d7ab29
100755
(executable)
--- a/
fs_signup/fs_signup_server
+++ b/
fs_signup/fs_signup_server
@@
-15,7
+15,7
@@
use vars qw( $opt $Debug );
$Debug = 0;
$Debug = 0;
-my @payby = qw(CARD);
+my @payby = qw(CARD
PREPAY
);
my $user = shift or die &usage;
&adminsuidsetup( $user );
my $user = shift or die &usage;
&adminsuidsetup( $user );
@@
-128,7
+128,7
@@
while (1) {
my $part_pkg = qsearchs( 'part_pkg', { 'pkgpart' => $pkgpart } )
or $error ||= "WARNING: unknown pkgpart $pkgpart";
my $part_pkg = qsearchs( 'part_pkg', { 'pkgpart' => $pkgpart } )
or $error ||= "WARNING: unknown pkgpart $pkgpart";
- my $svcpart = $part_pkg->svcpart;
+ my $svcpart = $part_pkg->svcpart
unless $error
;
# this should wind up in FS::cust_pkg!
my $agent = qsearchs( 'agent', { 'agentnum' => $agentnum } );
# this should wind up in FS::cust_pkg!
my $agent = qsearchs( 'agent', { 'agentnum' => $agentnum } );