blob: dd3d1f0d4c574e0fd7b5ac640afece6300e5dad8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
% foreach my $item (@content) {
%
% if ( $item =~ /^\s*$/ ) {
<BR>
% next;
% }
%
% if ( $items{$item} ) {
<& "custom_content/$item.html", $cust_main &>
% } else {
Unknown item <% $item |h %><BR>
% }
% }
<%init>
my($cust_main) = @_;
my $conf = new FS::Conf;
my @content = $conf->config('cust_main-custom_content');
my %items = map { $_=>1 } qw(
small_custview
birthdate
spouse_birthdate
svc_acct
svc_phone
svc_hardware
);
</%init>
|