Changeset 10442 for trunk/gsdl/perllib
- Timestamp:
- 2005-08-09T10:44:32+12:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/BasPlug.pm
r10347 r10442 1006 1006 } 1007 1007 } 1008 1009 1008 1009 # VB scripting generated Word to HTML file 1010 if ($text =~ /charset=(.*)[\"]/ig){ 1011 my $vbhtml_encoding = $1; 1012 $vbhtml_encoding =~ s/-+/_/g; 1013 $self->{'input_encoding'} = $vbhtml_encoding; 1014 } 1015 1010 1016 # remove <title>stuff</title> -- as titles tend often to be in English 1011 1017 # for foreign language documents
Note:
See TracChangeset
for help on using the changeset viewer.