diff --git a/lib/WebGUI/Asset/File/GalleryFile/Photo.pm b/lib/WebGUI/Asset/File/GalleryFile/Photo.pm index 0bb1e9fa5..7f1af4da8 100644 --- a/lib/WebGUI/Asset/File/GalleryFile/Photo.pm +++ b/lib/WebGUI/Asset/File/GalleryFile/Photo.pm @@ -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 } ]; } #----------------------------------------------------------------------------