Changeset 10514
- Timestamp:
- 2005-08-16T12:14:23+12:00 (19 years ago)
- Location:
- trunk/gsdl/perllib/plugins
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/PDFPlug.pm
r10452 r10514 86 86 { 'name' => "use_sections", 87 87 'desc' => "{PDFPlug.use_sections}", 88 'type' => "flag" } ]; 88 'type' => "flag" }, 89 { 'name' => "description_tags", 90 'desc' => "{HTMLPlug.description_tags}", 91 'type' => "flag" } 92 ]; 89 93 90 94 my $options = { 'name' => "PDFPlug", … … 149 153 push(@$html_options,"-metadata_fields","Title,GENERATOR,date,author<Creator>"); 150 154 151 if ($self->{'use_sections'} ) {155 if ($self->{'use_sections'} || $self->{'description_tags'}) { 152 156 $self->{'description_tags'} = 1; 153 157 push(@$html_options,"-description_tags"); -
trunk/gsdl/perllib/plugins/RTFPlug.pm
r10425 r10514 42 42 'type' => "regexp", 43 43 'deft' => &get_default_process_exp(), 44 'reqd' => "no" } ]; 44 'reqd' => "no" }, 45 { 'name' => "description_tags", 46 'desc' => "{HTMLPlug.description_tags}", 47 'type' => "flag" } 48 ]; 45 49 46 50 my $options = { 'name' => "RTFPlug", … … 74 78 push(@$text_options, "-input_encoding", "utf8"); 75 79 push(@$text_options,"-extract_language"); 80 if ($self->{'description_tags'} == 1) { 81 push(@$html_options, "-description_tags"); 82 } 76 83 77 84 -
trunk/gsdl/perllib/plugins/WordPlug.pm
r10496 r10514 40 40 'type' => "regexp", 41 41 'deft' => &get_default_process_exp(), 42 'reqd' => "no" } 42 'reqd' => "no" }, 43 { 'name' => "description_tags", 44 'desc' => "{HTMLPlug.description_tags}", 45 'type' => "flag" } 43 46 ]; 44 47 … … 152 155 push(@$html_options,"-extract_language"); 153 156 } 154 157 if ($self->{'description_tags'} == 1) { 158 push(@$html_options, "-description_tags"); 159 } 155 160 # Instruct HTMLPlug (when eventually accessed through read_into_doc_obj) 156 161 # to extract these metadata fields from the HEAD META fields
Note:
See TracChangeset
for help on using the changeset viewer.