- Timestamp:
- 2013-11-28T15:30:17+13:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugouts/BasePlugout.pm
r28642 r28707 90 90 'hiddengli' => "yes"}, 91 91 { 'name' => 'no_rss', 92 'desc' => '{BasPlugout.no_rss}',92 'desc' => "{BasPlugout.no_rss}", 93 93 'type' => 'flag', 94 94 'reqd' => 'no', 95 95 'hiddengli' => 'yes'}, 96 { 'name' => "no_auxiliary_databases", 97 'desc' => "{BasPlugout.no_auxiliary_databases}", 98 'type' => "flag", 99 'reqd' => "no", 100 'hiddengli' => "yes"} 101 96 102 ]; 97 103 … … 146 152 my $full_file_path = &util::locate_config_file($self->{'xslt_file'}); 147 153 if (!defined $full_file_path) { 148 print STDERR "Can not find $self->{'xslt_file'}, please make sure you have supplied the correct file path \n";154 print STDERR "Can not find $self->{'xslt_file'}, please make sure you have supplied the correct file path or put the file into the collection's etc or greenstone's etc folder\n"; 149 155 die "\n"; 150 156 } … … 158 164 $self->{'keep_import_structure'} = 0; 159 165 166 $self->{'generate_databases'} = 1; 167 if ($self->{'no_auxiliary_databases'}) { 168 $self->{'generate_databases'} = 0; 169 } 170 undef $self->{'no_auxiliary_databases'}; 160 171 return bless $self, $class; 161 172 162 173 } 163 174 175 # implement this in subclass if you want to do some initialization after 176 # loading and setting parameters, and before processing the documents. 177 sub begin { 178 179 my $self= shift (@_); 180 181 } 164 182 sub print_xml_usage 165 183 { … … 460 478 461 479 # write out data to archiveinf-doc.db 462 $self->archiveinf_db($doc_obj); 463 480 if ($self->{'generate_databases'}) { 481 $self->archiveinf_db($doc_obj); 482 } 464 483 if ($self->is_group()) { 465 484 $self->{'gs_count'}++; # do we want this for all cases? … … 968 987 } 969 988 989 990 970 991 sub open_xslt_pipe 971 992 {
Note:
See TracChangeset
for help on using the changeset viewer.