Changeset 22818 for main/trunk
- Timestamp:
- 2010-08-31T14:11:21+12:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugouts/BasePlugout.pm
r22328 r22818 371 371 372 372 if (!defined $nondoctype){ 373 print $handle '<!DOCTYPE Archive SYSTEM "http://greenstone.org/dtd/Archive/1.0/Archive.dtd">' . "\n"; 373 my $doctype = (defined $docroot) ? $docroot : "Section"; 374 375 # Used to be '<!DOCTYPE Archive SYSTEM ...' 376 377 print $handle "<!DOCTYPE $doctype SYSTEM \"http://greenstone.org/dtd/Archive/1.0/Archive.dtd\">\n"; 374 378 } 375 379
Note:
See TracChangeset
for help on using the changeset viewer.