diff options
author | jeff <jeff> | 2010-08-24 17:30:34 +0000 |
---|---|---|
committer | jeff <jeff> | 2010-08-24 17:30:34 +0000 |
commit | 51add281a0ca46ffa75bfa5e2aa45c0da9bb9643 (patch) | |
tree | 26f251164aa1d2f4f24f812d2fec2aa073bf653e /httemplate/search/477.html | |
parent | 798c63aa6265165ea56c3a7543e3e477e6dc12d4 (diff) |
fixup 477 XML output
Diffstat (limited to 'httemplate/search/477.html')
-rwxr-xr-x | httemplate/search/477.html | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/httemplate/search/477.html b/httemplate/search/477.html index 63eab7ac8..d586406af 100755 --- a/httemplate/search/477.html +++ b/httemplate/search/477.html @@ -35,7 +35,7 @@ % next unless ( $part{'IIA'} || $part{'IIB'} ); % } % -% if ( $part eq 'VI' ) { +% if ( $part eq 'VI_census' ) { % next unless $part{'IA'}; % } % @@ -55,12 +55,12 @@ % } % } else { % if ( $type eq 'xml' ) { -<<% 'Part_'. uc($part) %>> +<<% 'Part_'. $part %>> % } % my $url = &{$url_mangler}($part); <% include( "477part${part}.html", 'url' => $url ) %> % if ( $type eq 'xml' ) { -</<% 'Part_'. uc($part) %>> +</<% 'Part_'. $part %>> % } % } % } @@ -88,6 +88,6 @@ my $url_mangler = sub { $url =~ s/477\./477part$part./; $url; }; -my @parts = qw( IA IIA IIB IV V VI ); +my @parts = qw( IA IIA IIB IV V VI_census ); </%init> |