From 9e5512eacf9868dfaef17c4ce7112d06f768a525 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 8 Feb 2010 19:02:31 +0000 Subject: [PATCH] h_svc_pbx.pm, RT#7322 --- FS/FS.pm | 2 ++ FS/FS/h_svc_pbx.pm | 33 +++++++++++++++++++++++++++++++++ FS/MANIFEST | 2 ++ FS/t/h_svc_pbx.t | 5 +++++ 4 files changed, 42 insertions(+) create mode 100644 FS/FS/h_svc_pbx.pm create mode 100644 FS/t/h_svc_pbx.t diff --git a/FS/FS.pm b/FS/FS.pm index 67c2cd26f..f9c7f3573 100644 --- a/FS/FS.pm +++ b/FS/FS.pm @@ -372,6 +372,8 @@ L - Historical mail forwarding alias objects L - Historical phone number objects +L - Historical PBX objects + L - Historical web virtual host objects =head2 Remote API modules diff --git a/FS/FS/h_svc_pbx.pm b/FS/FS/h_svc_pbx.pm new file mode 100644 index 000000000..db702f322 --- /dev/null +++ b/FS/FS/h_svc_pbx.pm @@ -0,0 +1,33 @@ +package FS::h_svc_pbx; + +use strict; +use vars qw( @ISA ); +use FS::h_Common; +use FS::svc_pbx; + +@ISA = qw( FS::h_Common FS::svc_pbx ); + +sub table { 'h_svc_pbx' }; + +=head1 NAME + +FS::h_svc_pbx - Historical PBX objects + +=head1 SYNOPSIS + +=head1 DESCRIPTION + +An FS::h_svc_pbx object represents a historical PBX tenant. FS::h_svc_pbx +inherits from FS::h_Common and FS::svc_pbx. + +=head1 BUGS + +=head1 SEE ALSO + +L, L, L, schema.html from the base +documentation. + +=cut + +1; + diff --git a/FS/MANIFEST b/FS/MANIFEST index f3d2a6909..567f878e6 100644 --- a/FS/MANIFEST +++ b/FS/MANIFEST @@ -478,6 +478,8 @@ t/prospect_main.t FS/o2m_Common.pm FS/svc_pbx.pm t/svc_pbx.t +FS/h_svc_www.pm +t/h_svc_www.t FS/discount.pm t/discount.t FS/cust_pkg_discount.pm diff --git a/FS/t/h_svc_pbx.t b/FS/t/h_svc_pbx.t new file mode 100644 index 000000000..8b30f52a7 --- /dev/null +++ b/FS/t/h_svc_pbx.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::h_svc_pbx; +$loaded=1; +print "ok 1\n"; -- 2.11.0