Changeset 31493
- Timestamp:
- 2017-03-13T12:05:44+13:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/BaseImporter.pm
r31492 r31493 120 120 'type' => "flag", 121 121 'reqd' => "no" }, 122 # { 'name' => "filename_encoding", 123 # 'desc' => "{BaseImporter.filename_encoding}", 124 # 'type' => "enum", 125 # 'deft' => "auto", 126 # 'list' => $encoding_plus_auto_list, 127 # 'reqd' => "no" }, 128 { 'name' => "smart_block", 129 'desc' => "{common.deprecated}. {BaseImporter.smart_block}", 130 'type' => "flag", 131 'reqd' => "no", 132 'hiddengli' => "yes" }, # deprecated, but leave in for old collections 133 { 'name' => "file_rename_method", 122 { 'name' => "file_rename_method", 134 123 'desc' => "{BaseImporter.file_rename_method}", 135 124 'type' => "enum", … … 163 152 return bless $self, $class; 164 153 } 165 if ($self->{'smart_block'}) {166 print STDERR "WARNING: -smart_block option has been deprecated and is no longer useful\n";167 }168 $self->{'smart_block'} = undef;169 154 170 155 my $plugin_name = (defined $pluginlist->[0]) ? $pluginlist->[0] : $class;
Note:
See TracChangeset
for help on using the changeset viewer.