From b5eb8210f7f7ada0f81bfadf25ce702895970d54 Mon Sep 17 00:00:00 2001
From: Baz Cuda <bazzacuda@gmx.com>
Date: Tue, 23 Apr 2024 10:34:18 +0100
Subject: [PATCH] Image interval only affects images

---
 mediaPlayer.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/mediaPlayer.pas b/mediaPlayer.pas
index 5995517..a2b3f42 100644
--- a/mediaPlayer.pas
+++ b/mediaPlayer.pas
@@ -427,12 +427,15 @@ procedure TMediaPlayer.onStateChange(cSender: TObject; eState: TMPVPlayerState);
 begin
   FPlaying := eState = mpsPlay;
 
-//  case FPausePlay AND NOT UI.autoCentre of TRUE: EXIT; end;
+//  case FPausePlay AND NOT UI.autoCentre of TRUE: EXIT; end;       // What ???
   case FImagePaused AND (FMediaType = mtImage) of TRUE: EXIT; end;
 
   case eState of
     mpsPlay: postMessage(GV.appWnd, WM_ADJUST_ASPECT_RATIO, 0, 0);
-    mpsEnd {, mpsStop}:  case FDontPlayNext of FALSE: begin CU.delay(trunc(FImageDisplayDurationSS) * 1000); playNext; end;end;
+    mpsEnd {, mpsStop}:  case FDontPlayNext of FALSE: begin
+                                                        case FMediaType = mtImage of TRUE: CU.delay(trunc(FImageDisplayDurationSS) * 1000); end;
+                                                        playNext;
+                                                      end;end;
   end;
 end;