From 33097211d0bd2bb97327c3e6e0d111745b9e8f61 Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Mon, 27 Sep 2021 22:45:12 -0600 Subject: [PATCH] fix PinNextImage --- src/nat/ArchiveController.kiss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/nat/ArchiveController.kiss b/src/nat/ArchiveController.kiss index a7be3c0..899a523 100644 --- a/src/nat/ArchiveController.kiss +++ b/src/nat/ArchiveController.kiss @@ -225,7 +225,7 @@ (doFor e entries (if (hasComponent e Images) (withWritableComponents archive e [images Images] - (set images.pinnedImageIndex (max 0 (min images.imageFiles.length (+ increment images.pinnedImageIndex))))) + (set images.pinnedImageIndex (max 0 (min (- images.imageFiles.length 1) (+ increment images.pinnedImageIndex))))) (ui.reportError "Entry $e has no Images component"))) entries)