mason/.perl-lib/TrivGal.pm: Fix image flipping again, but properly.

Brown paper bag time.

diff --git a/mason/.perl-lib/TrivGal.pm b/mason/.perl-lib/TrivGal.pm
index 8d776c2a8e4a16c214f30f101884c312dbec3350..ea3b47a0b1abbbd72764576a371d1879d087cd93 100644 (file)
--- a/mason/.perl-lib/TrivGal.pm
+++ b/mason/.perl-lib/TrivGal.pm
@@ -237,7 +237,7 @@ package TrivGal::Image {
       if (defined $orient) {
        my ($rot, $flip) = @{$ORIENT{$orient}};
        if ($rot) { $img->image_orientate($rot); }
       if (defined $orient) {
        my ($rot, $flip) = @{$ORIENT{$orient}};
        if ($rot) { $img->image_orientate($rot); }

-       if ($flip) { $img->flip_horizontal($flip); }
+       if ($flip) { $img->flip_horizontal(); }

       }
     }
 
       }
     }