diff --git a/Gifcurry.cabal b/Gifcurry.cabal
--- a/Gifcurry.cabal
+++ b/Gifcurry.cabal
@@ -1,5 +1,5 @@
 name:                Gifcurry
-version:             2.0.0.1
+version:             2.0.0.2
 synopsis:            Create animated GIFs, overlaid with optional text, from video files.
 description:         GIF creation utility.
 homepage:            https://github.com/lettier/gifcurry
diff --git a/gui_src/Main.hs b/gui_src/Main.hs
--- a/gui_src/Main.hs
+++ b/gui_src/Main.hs
@@ -198,8 +198,8 @@
         let outputFilePathName = tmpdir ++ "/end.gif"
         success <- ioSuccess $ makeGifPreview inputFilePathName outputFilePathName startTime' " LAST FRAME  "
         if success
-          then postGUIAsync $ imageSetFromFile lastFrameImage outputFilePathName
-          else postGUIAsync $ resetImage lastFrameImage
+          then postGUISync $ imageSetFromFile lastFrameImage outputFilePathName
+          else postGUISync $ resetImage lastFrameImage
       else postGUIAsync $ resetImage lastFrameImage
   return ()
 
@@ -213,8 +213,8 @@
         let outputFilePathName = tmpDir ++ "/start.gif"
         success <- ioSuccess $ makeGifPreview inputFilePathName outputFilePathName startTime " FIRST FRAME "
         if success
-          then postGUIAsync $ imageSetFromFile firstFrameImage outputFilePathName
-          else postGUIAsync $ resetImage firstFrameImage
-      else postGUIAsync $ resetImage firstFrameImage
+          then postGUISync $ imageSetFromFile firstFrameImage outputFilePathName
+          else postGUISync $ resetImage firstFrameImage
+      else postGUISync $ resetImage firstFrameImage
     makeLastFramePreview inputFileButton startTimeEntry durationTimeEntry lastFrameImage
   return ()