projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add signup server default package
[freeside.git]
/
fs_selfservice
/
FS-SelfService
/
cgi
/
signup.cgi
diff --git
a/fs_selfservice/FS-SelfService/cgi/signup.cgi
b/fs_selfservice/FS-SelfService/cgi/signup.cgi
index
a091892
..
ad98869
100755
(executable)
--- a/
fs_selfservice/FS-SelfService/cgi/signup.cgi
+++ b/
fs_selfservice/FS-SelfService/cgi/signup.cgi
@@
-1,7
+1,5
@@
#!/usr/bin/perl -T
#!/usr/bin/perl -Tw
#!/usr/bin/perl -T
#!/usr/bin/perl -Tw
-#
-# $Id: signup.cgi,v 1.3 2006-08-29 17:50:06 lawrence Exp $
use strict;
use vars qw( @payby $cgi $init_data
use strict;
use vars qw( @payby $cgi $init_data
@@
-233,6
+231,8
@@
sub print_form {
'error' => $error,
};
'error' => $error,
};
+ $r->{pkgpart} ||= $r->{default_pkgpart};
+
$r->{referral_custnum} = $r->{'ref'};
#$cgi->delete('ref');
#$cgi->delete('init_popstate');
$r->{referral_custnum} = $r->{'ref'};
#$cgi->delete('ref');
#$cgi->delete('init_popstate');