/[suikacvs]/markup/html/whatpm/Whatpm/ContentChecker.pm
Suika

Diff of /markup/html/whatpm/Whatpm/ContentChecker.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.47 by wakaba, Sun Sep 9 07:57:32 2007 UTC revision 1.48 by wakaba, Mon Sep 24 04:23:44 2007 UTC
# Line 202  sub check_document ($$$) { Line 202  sub check_document ($$$) {
202    $self = bless {}, $self unless ref $self;    $self = bless {}, $self unless ref $self;
203    $self->{onerror} = $onerror;    $self->{onerror} = $onerror;
204    
205      $self->{must_level} = 'm';
206      $self->{fact_level} = 'f';
207      $self->{should_level} = 's';
208      $self->{good_level} = 'g';
209    
210    my $docel = $doc->document_element;    my $docel = $doc->document_element;
211    unless (defined $docel) {    unless (defined $docel) {
212      ## ISSUE: Should we check content of Document node?      ## ISSUE: Should we check content of Document node?
# Line 244  sub check_element ($$$) { Line 249  sub check_element ($$$) {
249    $self = bless {}, $self unless ref $self;    $self = bless {}, $self unless ref $self;
250    $self->{onerror} = $onerror;    $self->{onerror} = $onerror;
251    
252      $self->{must_level} = 'm';
253      $self->{fact_level} = 'f';
254      $self->{should_level} = 's';
255      $self->{good_level} = 'g';
256    
257    $self->{minuses} = {};    $self->{minuses} = {};
258    $self->{id} = {};    $self->{id} = {};
259    $self->{term} = {};    $self->{term} = {};

Legend:
Removed from v.1.47  
changed lines
  Added in v.1.48

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24