Support cloning of first image in subimage specification, e.g. logo:[0,0]

diff --git a/MagickCore/constitute.c b/MagickCore/constitute.c
index 0f61af41115925e17151d4379e14680383cda3ea..14cb3f074dd3737c062ef5d8b074d2822679949e 100644 (file)
--- a/MagickCore/constitute.c
+++ b/MagickCore/constitute.c
@@ -619,8 +619,10 @@ MagickExport Image *ReadImage(const ImageInfo *image_info,
       "notify the developers",image->magick,exception->severity);
   if (IsBlobTemporary(image) != MagickFalse)
     (void) RelinquishUniqueFileResource(read_info->filename);
-  if ((GetNextImageInList(image) != (Image *) NULL) &&
-      (IsSceneGeometry(read_info->scenes,MagickFalse) != MagickFalse))
+  if ((IsSceneGeometry(read_info->scenes,MagickFalse) != MagickFalse) &&
+      ((GetNextImageInList(image) != (Image *) NULL) ||
+       ((read_info->scenes != (char *) NULL) &&
+        (strchr(read_info->scenes,',') != (char *) NULL))))
     {
       Image
         *clones;