stas 02/04/21 09:36:36 Modified: lib/DocSet DocSet.pm Log: handle properly hidden chapters rebuild Revision Changes Path 1.10 +5 -2 modperl-docs/lib/DocSet/DocSet.pm Index: DocSet.pm =================================================================== RCS file: /home/cvs/modperl-docs/lib/DocSet/DocSet.pm,v retrieving revision 1.9 retrieving revision 1.10 diff -u -r1.9 -r1.10 --- DocSet.pm 21 Apr 2002 15:36:53 -0000 1.9 +++ DocSet.pm 21 Apr 2002 16:36:35 -0000 1.10 @@ -140,8 +140,11 @@ } elsif ($type eq 'chapters') { my $chapter = $self->chapter_scan_n_cache($data, $hidden); - $self->object_store($chapter) - if defined $chapter and ref $chapter; + if (defined $chapter and ref $chapter) { + # modified chapter --> modified docset + $self->modified(1); + $self->object_store($chapter) + } } else { # nothing
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]