Changeset 12883
- Timestamp:
- 2006-09-28T10:43:16+12:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/HTMLPlug.pm
r12269 r12883 384 384 unless $self->{'no_metadata'}; 385 385 } 386 387 } else { 388 386 } 387 else { 389 388 # remove header and footer 390 if (!$self->{'keep_head'} || $self->{'description_tags'}) {389 if (!$self->{'keep_head'}) { 391 390 $$textref =~ s/^.*?<body[^>]*>//is; 392 391 $$textref =~ s/(<\/body[^>]*>|<\/html[^>]*>)//isg;
Note:
See TracChangeset
for help on using the changeset viewer.