- Timestamp:
- 2009-12-14T14:46:56+13:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs3-extensions/pharos-imageis/trunk/perllib/plugins/PharosImageIndexer.pm
r21316 r21342 39 39 40 40 my $arguments = [ 41 { 'name' => "disable_pharos_imageis",42 'desc' => "{PharosImageIndexer.disable_pharos_imageis}",43 'type' => "flag",44 'reqd' => "no" },45 41 ]; 46 42 … … 70 66 my $self = shift(@_); 71 67 72 return if ($self->{'disable_pharos_imageis'});73 74 68 # Check that Pharos is installed and available on the path 75 69 my $pharos_available = 1; … … 98 92 my ($file, $oids, $archivedir) = @_; 99 93 print STDERR "in pharos remove_one, $file, $oids\n"; 100 return if ($self->{'disable_pharos_imageis'});101 94 102 95 if (!$self->{'pharos_available'}) { … … 123 116 my ($pluginfo, $base_dir, $processor, $maxdocs) = @_; 124 117 125 return if ($self->{'disable_pharos_imageis'});126 127 118 if (!$self->{'pharos_available'}) { 128 119 print STDERR "pharos not available, not doing a remove_all\n"; … … 146 137 my $self = shift(@_); 147 138 148 return if ($self->{'disable_pharos_imageis'} || !$self->{'pharos_available'}); 139 if ( !$self->{'pharos_available'}) { 140 print STDERR "pharos not available, can't index the image\n"; 141 return; 142 } 149 143 # pass in the jpg thumbnail, and the doc obj 150 144 my ($filename_full_path, $doc_obj) = @_;
Note:
See TracChangeset
for help on using the changeset viewer.