--- test/html-webhacc/cc.cgi 2008/07/27 10:33:45 1.61 +++ test/html-webhacc/cc.cgi 2008/09/17 03:56:43 1.68 @@ -1,4 +1,5 @@ #!/usr/bin/perl +# -d:DProf use strict; use lib qw[/home/httpd/html/www/markup/html/whatpm @@ -44,8 +45,6 @@ require WebHACC::Result; my $result = WebHACC::Result->new; - $result->{conforming_min} = 1; - $result->{conforming_max} = 1; $result->output ($out); require WebHACC::Input; @@ -53,8 +52,6 @@ check_and_print ($input => $result => $out); - $result->generate_result_section; - $out->nav_list; exit; @@ -70,14 +67,20 @@ $input->generate_transfer_sections ($result); unless (defined $input->{s}) { - $result->{conforming_min} = 0; + ## NOTE: This is an error of the implementation. + $result->layer_uncertain ('transfer'); + $result->generate_result_section; + + $out->input ($original_input); return; } my $checker_class = { 'text/cache-manifest' => 'WebHACC::Language::CacheManifest', 'text/css' => 'WebHACC::Language::CSS', + 'text/x-css-inline' => 'WebHACC::Language::CSSInline', 'text/html' => 'WebHACC::Language::HTML', + 'text/x-h2h' => 'WebHACC::Language::H2H', 'text/x-webidl' => 'WebHACC::Language::WebIDL', 'text/xml' => 'WebHACC::Language::XML', @@ -122,11 +125,17 @@ unless defined $subinput->{base_uri}; $subinput->{parent_input} = $input; - $subinput->start_section ($result); - check_and_print ($subinput => $result => $out); - $subinput->end_section ($result); + my $subresult = WebHACC::Result->new; + $subresult->output ($out); + $subresult->parent_result ($result); + + $subinput->start_section ($subresult); + check_and_print ($subinput => $subresult => $out); + $subinput->end_section ($subresult); } + $result->generate_result_section; + $out->input ($original_input); } # check_and_print @@ -143,4 +152,4 @@ =cut -## $Date: 2008/07/27 10:33:45 $ +## $Date: 2008/09/17 03:56:43 $