/[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.52 by wakaba, Fri Nov 23 05:39:43 2007 UTC revision 1.53 by wakaba, Sun Nov 25 03:46:07 2007 UTC
# Line 378  sub check_element ($$$) { Line 378  sub check_element ($$$) {
378          $Element->{$nsuri}->{''} ||          $Element->{$nsuri}->{''} ||
379            $ElementDefault;            $ElementDefault;
380        $eldef->{attrs_checker}->($self, $todo);        $eldef->{attrs_checker}->($self, $todo);
381        } elsif ($todo->{type} eq 'descendant') {
382          for my $key (keys %{$todo->{errors}}) {
383            unless ($todo->{flag}->{has_descendant}->{$key}) {
384              $todo->{errors}->{$key}->($self, $todo);
385            }
386            for my $key (keys %{$todo->{old_values}}) {
387              $todo->{flag}->{has_descendant}->{$key}
388                  ||= $todo->{old_values}->{$key};
389            }
390          }
391      } elsif ($todo->{type} eq 'plus' or $todo->{type} eq 'minus') {      } elsif ($todo->{type} eq 'plus' or $todo->{type} eq 'minus') {
392        $self->_remove_minuses ($todo);        $self->_remove_minuses ($todo);
393      } elsif ($todo->{type} eq 'code') {      } elsif ($todo->{type} eq 'code') {

Legend:
Removed from v.1.52  
changed lines
  Added in v.1.53

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24