Changeset 33309 for main/trunk
- Timestamp:
- 2019-07-08T15:46:18+12:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/StructuredHTMLPlugin.pm
r33301 r33309 165 165 #$body_text =~ s/(<div.*)/$top_section_tag$1/i; 166 166 my $body = "<body".$body_text; 167 168 # remove empty headings that Word's windows_scripting may insert for multiple new lines around headings 169 # have heading markup, e.g. <h2><o:p> </o:p></h2> 170 $body =~ s@<h[1-6]>(<o:p>)?( )+(</o:p>)?</h[1-6]>@@gis; 167 171 168 172 my $section_text = $head;
Note:
See TracChangeset
for help on using the changeset viewer.