fixed: profile photos don't obey max image size

docs/changelog/7.x.x.txt

@@ -7,6 +7,7 @@
  - fixed: Form::FieldType->getTypes should exclude Form::Slider base class (Yung Han Khoe)
  - upgraded to TinyMCE 3
  - fixed: subscription group in CS edit not internationalized
+ - fixed: profile photos don't obey max image size
 
 7.5.8
  - moved Gallery utility methods to WebGUI::Utility::Gallery

lib/WebGUI/Asset/File/GalleryFile/Photo.pm

@@ -119,7 +119,7 @@ sub applyConstraints {
     my $parameters      = $self->get("parameters");
     my $storage         = $self->getStorageLocation;
     my $file            = $self->get("filename");
-    $storage->adjustMaxImageSize($file);
+    $storage->adjustMaxImageSize($file, $maxImageSize);
     $self->generateThumbnail;
     $self->setSize;
     $self->makeResolutions;

lib/WebGUI/Asset/File/Image.pm

@@ -74,8 +74,8 @@ sub applyConstraints {
 		$self->update({parameters=>$parameters.' alt="'.$self->get("title").'"'});
 	}
     my $file = $self->get("filename");
-    $storage->adjustMaxImageSize($file);
+    $storage->adjustMaxImageSize($file, $maxImageSize);
-	$self->generateThumbnail($thumbnailSize);
+    $self->generateThumbnail($thumbnailSize);
     $self->setSize;
 }
 

lib/WebGUI/Asset/Post.pm

@@ -161,7 +161,8 @@ sub definition {
     my $properties = {
         storageId => {
             fieldType=>"image",
-            defaultValue=>undef
+            defaultValue=>undef,
+            enforceSizeLimits => 0,
         },
         threadId => {
             noFormPost=>1,

lib/WebGUI/Asset/Wobject/Article.pm

@@ -229,9 +229,6 @@ sub processPropertiesFromFormPost {
     my $size = 0;
     my $storage = $self->getStorageLocation;
     foreach my $file (@{$storage->getFiles}) {
-        if ($storage->isImage($file)) {
-            $storage->adjustMaxImageSize($size);
-        }
         $size += $storage->getFileSize($file);
     }
     $self->setSize($size);

lib/WebGUI/Form/Image.pm

@@ -81,6 +81,9 @@ sub definition {
 		forceImageOnly=>{
 			defaultValue=>0
 			},
+        enforceSizeLimits => {
+            defaultValue    => 1
+        },
         dbDataType  => {
             defaultValue    => "VARCHAR(22) BINARY",
         },
@@ -201,7 +204,12 @@ sub getValueFromPost {
 			}
 
 			return undef unless @files;
-			$storage->generateThumbnail($_) for @images; # Make a thumbnail for each filename in @images
+            for my $image (@images) {
+                $storage->generateThumbnail($image); # Make a thumbnail for each file
+                if ($self->get('enforceSizeLimits')) {
+                    $storage->adjustMaxImageSize($image);
+                }
+            }
 		}
 	}
 	return $id;