add test and fix affine composition

Author: lorenzoh

src/projective/crop.jl

@@ -94,6 +94,10 @@ compose(tfm::ProjectiveTransform, crop::AbstractCrop) = CroppedProjectiveTransfo
 compose(tfm::ProjectiveTransform, crop::CroppedProjectiveTransform) =
     CroppedProjectiveTransform(tfm |> crop.tfm, crop.crop)
 
+function compose(composed::ComposedProjectiveTransform, cropped::CroppedProjectiveTransform)
+    return CroppedProjectiveTransform(composed |> cropped.tfm, cropped.crop)
+
+end
 
 
 """

test/projective/affine.jl

@@ -102,6 +102,13 @@ include("../imports.jl")
 
     end
 
+    @testset ExtendedTestSet "Rotate" begin
+        tfm = Zoom((0.1, 2.))
+        image = Image(rand(RGB, 50, 50))
+        @test_nowarn apply(tfm, image)
+
+    end
+
     @testset ExtendedTestSet "Reflect" begin
         tfm = Reflect(10)
         image = Image(rand(RGB, 50, 50))