You are viewing a plain text version of this content. The canonical link for it is here.
Posted to docs-cvs@perl.apache.org by st...@apache.org on 2002/04/21 18:36:36 UTC
cvs commit: modperl-docs/lib/DocSet DocSet.pm
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: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org