word edit: image source precede thumbnail convert options

[sheet.git] / writer.plp

diff --git a/writer.plp b/writer.plp
index b5499173be7a37623b461c73e1667f0cbc723c26..3c0b248bf9d859160269261912e745fa39bb16ad 100644 (file)
--- a/writer.plp
+++ b/writer.plp
@@ -297,12 +297,13 @@ elsif (defined $post{form}) {{
                        }
                        @cmds = (
                                'convert',
+                               $imgpath,
                                -delete => '1--1', -background => 'white',
                                -gravity => @cmds ? 'northwest' : 'center',
                                @cmds,
                                -resize => "$xyres^", -extent => $xyres,
                                '-strip', -quality => '60%', -interlace => 'plane',
-                               $imgpath => $thumbpath
+                               $thumbpath
                        );
                        eval {
                                require IPC::Run;