Fix a bad sort. Clarify some POD in the Photo.
This commit is contained in:
parent
cdc2ea2547
commit
252138777c
1 changed files with 2 additions and 2 deletions
|
|
@ -294,7 +294,7 @@ sub getExifData {
|
|||
=head2 getResolutions ( )
|
||||
|
||||
Get an array reference of download resolutions that exist for this image.
|
||||
Does not include the web view image or the thumbnail image.
|
||||
Does not include the web view image or the thumbnail images.
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -303,7 +303,7 @@ sub getResolutions {
|
|||
my $storage = $self->getStorageLocation;
|
||||
|
||||
# Return a list not including the web view image.
|
||||
return [ sort { $a <=> $b } grep { $_ ne $self->get("filename") } @{ $storage->getFiles } ];
|
||||
return [ sort { $a cmp $b } grep { $_ ne $self->get("filename") } @{ $storage->getFiles } ];
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue