Changeset 19222
- Timestamp:
- 2009-04-23T13:56:22+12:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/BasePlugin.pm
r18591 r19222 203 203 $self->{'cover_image'} = 1; # cover image is on by default 204 204 $self->{'cover_image'} = 0 if ($self->{'no_cover_image'}); 205 $self->{'can_process_directories'} = 0; 205 206 #$self->{'option_list'} = $hashArgOptLists->{"OptList"}; 206 207 … … 487 488 my ($filename) = @_; 488 489 490 if (-d $filename && !$self->{'can_process_directories'}) { 491 return 0; 492 } 489 493 if ($self->{'process_exp'} ne "" && $filename =~ /$self->{'process_exp'}/) { 490 494 return 1;
Note:
See TracChangeset
for help on using the changeset viewer.