Changeset 20758 for gsdl/trunk/perllib/plugins/ArchivesInfPlugin.pm
- Timestamp:
- 2009-09-30T10:54:55+13:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/ArchivesInfPlugin.pm
r20577 r20758 47 47 48 48 my $arguments = [ 49 { 'name' => "reversesort", 50 'desc' => "{ArchivesInfPlugin.reversesort}", 51 'type' => "flag", 52 'reqd' => "no", 53 'modegli' => "2" }, 54 49 55 ]; 50 56 … … 213 219 $self->{'archive_info'} = $archive_info; 214 220 $self->{'archive_info_filename'} = $archive_info_filename; 215 221 if ($self->{'reversesort'}) { 222 $archive_info->reverse_sort(); 223 } 224 216 225 $archive_info->load_info ($archive_info_filename); 217 226
Note:
See TracChangeset
for help on using the changeset viewer.