From 9c92be47ab6913c97664eda2747cde90d8d52d4b Mon Sep 17 00:00:00 2001
From: Cristy <urban-warrior@imagemagick.org>
Date: Sat, 11 Mar 2017 14:31:37 -0500
Subject: [PATCH] ...

---
 PerlMagick/quantum/quantum.xs.in | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/PerlMagick/quantum/quantum.xs.in b/PerlMagick/quantum/quantum.xs.in
index b9c709601..32955a8be 100644
--- a/PerlMagick/quantum/quantum.xs.in
+++ b/PerlMagick/quantum/quantum.xs.in
@@ -5008,11 +5008,11 @@ Get(ref,...)
             }
           if (LocaleCompare(attribute,"filename") == 0)
             {
-              if (info && info->image_info->filename &&
-                  *info->image_info->filename)
-                s=newSVpv(info->image_info->filename,0);
               if (image != (Image *) NULL)
                 s=newSVpv(image->filename,0);
+              else
+                if (info && *info->image_info->filename)
+                  s=newSVpv(info->image_info->filename,0);
               PUSHs(s ? sv_2mortal(s) : &sv_undef);
               continue;
             }
-- 
2.40.0