(no commit message)

diff --git a/PerlMagick/Magick.xs b/PerlMagick/Magick.xs
index ca2c05aa6116972802471273a4b3f846d982d1de..85be652880d424ecb18c89a8a52a23a4e170a2ff 100644 (file)
--- a/PerlMagick/Magick.xs
+++ b/PerlMagick/Magick.xs
@@ -285,7 +285,8 @@ static struct
       {"fill-pattern", ImageReference}, {"stroke-pattern", ImageReference},
       {"tile", ImageReference}, {"kerning", RealReference},
       {"interline-spacing", RealReference},
-      {"interword-spacing", RealReference} } },
+      {"interword-spacing", RealReference},
+      {"direction", MagickDirectionOptions} } },
     { "ColorFloodfill", { {"geometry", StringReference},
       {"x", IntegerReference}, {"y", IntegerReference},
       {"fill", StringReference}, {"bordercolor", StringReference},
@@ -8077,6 +8078,9 @@ Mogrify(ref,...)
             draw_info->interline_spacing=argument_list[30].real_reference;
           if (attribute_flag[31] != 0)
             draw_info->interword_spacing=argument_list[31].real_reference;
+          if (attribute_flag[32] != 0)
+            draw_info->direction=(DirectionType)
+              argument_list[32].long_reference;
           (void) AnnotateImage(image,draw_info);
           draw_info=DestroyDrawInfo(draw_info);
           break;

diff --git a/magick/draw.c b/magick/draw.c
index e4374c5c27a3db16ae82c3ef3b27ba6a86188b41..981ac11ffca4cfffcbae9f7cef62602731ba1461 100644 (file)
--- a/magick/draw.c
+++ b/magick/draw.c
@@ -4775,7 +4775,7 @@ MagickExport void GetDrawInfo(const ImageInfo *image_info,DrawInfo *draw_info)
   option=GetImageOption(clone_info,"interline-spacing");
   if (option != (const char *) NULL)
     draw_info->interline_spacing=StringToDouble(option);
-  draw_info->direction=1.0;
+  draw_info->direction=UndefinedDirection;
   option=GetImageOption(clone_info,"interword-spacing");
   if (option != (const char *) NULL)
     draw_info->interword_spacing=StringToDouble(option);

diff --git a/magick/draw.h b/magick/draw.h
index 9b39ebee79f4a88aa776a6948b3c3c44031e7d9b..1880a46a84946f1d4eacadc1fc24f11d338f3aad 100644 (file)
--- a/magick/draw.h
+++ b/magick/draw.h
@@ -326,7 +326,9 @@ typedef struct _DrawInfo
   double
     kerning,
     interword_spacing,
-    interline_spacing,
+    interline_spacing;
+
+  DirectionType
     direction;
 } DrawInfo;