diff options
author | ivan <ivan> | 2001-09-02 04:25:55 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-09-02 04:25:55 +0000 |
commit | f1ee95396defc991301ac758b71bdda9df82984e (patch) | |
tree | e74c506e501b88a93f7d19a1c5b0d3025ab2db1f /FS/t | |
parent | 29b94aeb1c3003f7a9bbfbe1a91a86f8b9edfbbc (diff) |
lame testsuite and the embarassing fixes in it found
Diffstat (limited to 'FS/t')
38 files changed, 190 insertions, 0 deletions
diff --git a/FS/t/CGI.t b/FS/t/CGI.t new file mode 100644 index 0000000..1b4e238 --- /dev/null +++ b/FS/t/CGI.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::CGI; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/CGIwrapper.t b/FS/t/CGIwrapper.t new file mode 100644 index 0000000..06c741c --- /dev/null +++ b/FS/t/CGIwrapper.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::CGIwrapper; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/Conf.t b/FS/t/Conf.t new file mode 100644 index 0000000..a9f7653 --- /dev/null +++ b/FS/t/Conf.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::Conf; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/Record.t b/FS/t/Record.t new file mode 100644 index 0000000..00de1ed --- /dev/null +++ b/FS/t/Record.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::Record; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/UID.t b/FS/t/UID.t new file mode 100644 index 0000000..9f7da4e --- /dev/null +++ b/FS/t/UID.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::UID; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/agent.t b/FS/t/agent.t new file mode 100644 index 0000000..769cce2 --- /dev/null +++ b/FS/t/agent.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::agent; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/agent_type.t b/FS/t/agent_type.t new file mode 100644 index 0000000..99c66a1 --- /dev/null +++ b/FS/t/agent_type.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::agent_type; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_bill.t b/FS/t/cust_bill.t new file mode 100644 index 0000000..b43f08e --- /dev/null +++ b/FS/t/cust_bill.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_bill; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_bill_pay.t b/FS/t/cust_bill_pay.t new file mode 100644 index 0000000..001eed0 --- /dev/null +++ b/FS/t/cust_bill_pay.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_bill_pay; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_bill_pkg.t b/FS/t/cust_bill_pkg.t new file mode 100644 index 0000000..0e45bdb --- /dev/null +++ b/FS/t/cust_bill_pkg.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_bill_pkg; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_credit.t b/FS/t/cust_credit.t new file mode 100644 index 0000000..cddf75c --- /dev/null +++ b/FS/t/cust_credit.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_credit; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_credit_bill.t b/FS/t/cust_credit_bill.t new file mode 100644 index 0000000..0ef54c3 --- /dev/null +++ b/FS/t/cust_credit_bill.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_credit_bill; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_credit_refund.t b/FS/t/cust_credit_refund.t new file mode 100644 index 0000000..6b2b599 --- /dev/null +++ b/FS/t/cust_credit_refund.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_credit_refund; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_main.t b/FS/t/cust_main.t new file mode 100644 index 0000000..b0ffbdb --- /dev/null +++ b/FS/t/cust_main.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_main; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_main_county.t b/FS/t/cust_main_county.t new file mode 100644 index 0000000..dd61199 --- /dev/null +++ b/FS/t/cust_main_county.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_main_county; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_main_invoice.t b/FS/t/cust_main_invoice.t new file mode 100644 index 0000000..9661620 --- /dev/null +++ b/FS/t/cust_main_invoice.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_main_invoice; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_pay.t b/FS/t/cust_pay.t new file mode 100644 index 0000000..f6d0b75 --- /dev/null +++ b/FS/t/cust_pay.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_pay; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_pay_batch.t b/FS/t/cust_pay_batch.t new file mode 100644 index 0000000..02b572c --- /dev/null +++ b/FS/t/cust_pay_batch.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_pay_batch; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_pkg.t b/FS/t/cust_pkg.t new file mode 100644 index 0000000..c6a6860 --- /dev/null +++ b/FS/t/cust_pkg.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_pkg; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_refund.t b/FS/t/cust_refund.t new file mode 100644 index 0000000..91583da --- /dev/null +++ b/FS/t/cust_refund.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_refund; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/cust_svc.t b/FS/t/cust_svc.t new file mode 100644 index 0000000..267d731 --- /dev/null +++ b/FS/t/cust_svc.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::cust_svc; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/domain_record.t b/FS/t/domain_record.t new file mode 100644 index 0000000..794518c --- /dev/null +++ b/FS/t/domain_record.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::domain_record; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/nas.t b/FS/t/nas.t new file mode 100644 index 0000000..6f8ae36 --- /dev/null +++ b/FS/t/nas.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::nas; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/part_pkg.t b/FS/t/part_pkg.t new file mode 100644 index 0000000..fd96073 --- /dev/null +++ b/FS/t/part_pkg.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_pkg; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/part_referral.t b/FS/t/part_referral.t new file mode 100644 index 0000000..d20b979 --- /dev/null +++ b/FS/t/part_referral.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_referral; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/part_svc.t b/FS/t/part_svc.t new file mode 100644 index 0000000..bdb2a7a --- /dev/null +++ b/FS/t/part_svc.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_svc; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/pkg_svc.t b/FS/t/pkg_svc.t new file mode 100644 index 0000000..77d3429 --- /dev/null +++ b/FS/t/pkg_svc.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::pkg_svc; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/port.t b/FS/t/port.t new file mode 100644 index 0000000..46377aa --- /dev/null +++ b/FS/t/port.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::port; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/prepay_credit.t b/FS/t/prepay_credit.t new file mode 100644 index 0000000..e7626bd --- /dev/null +++ b/FS/t/prepay_credit.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::prepay_credit; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/session.t b/FS/t/session.t new file mode 100644 index 0000000..c4b714e --- /dev/null +++ b/FS/t/session.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::session; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_Common.t b/FS/t/svc_Common.t new file mode 100644 index 0000000..ed49e1e --- /dev/null +++ b/FS/t/svc_Common.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_Common; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_acct.t b/FS/t/svc_acct.t new file mode 100644 index 0000000..9ca78c9 --- /dev/null +++ b/FS/t/svc_acct.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_acct; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_acct_pop.t b/FS/t/svc_acct_pop.t new file mode 100644 index 0000000..e612c40 --- /dev/null +++ b/FS/t/svc_acct_pop.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_acct_pop; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_acct_sm.t b/FS/t/svc_acct_sm.t new file mode 100644 index 0000000..1082f2c --- /dev/null +++ b/FS/t/svc_acct_sm.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_acct_sm; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_domain.t b/FS/t/svc_domain.t new file mode 100644 index 0000000..4d91898 --- /dev/null +++ b/FS/t/svc_domain.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_domain; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_forward.t b/FS/t/svc_forward.t new file mode 100644 index 0000000..d653d34 --- /dev/null +++ b/FS/t/svc_forward.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_forward; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/svc_www.t b/FS/t/svc_www.t new file mode 100644 index 0000000..eb4e83f --- /dev/null +++ b/FS/t/svc_www.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::svc_www; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/type_pkgs.t b/FS/t/type_pkgs.t new file mode 100644 index 0000000..9840180 --- /dev/null +++ b/FS/t/type_pkgs.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::type_pkgs; +$loaded=1; +print "ok 1\n"; |