From d14de65d001add0e8302b208ebc771118ab39891 Mon Sep 17 00:00:00 2001
From: Pierre-Yves Nicolas <6371790+pynicolas@users.noreply.github.com>
Date: Sun, 8 Jun 2025 20:13:14 +0200
Subject: [PATCH] DocumentScreen: in page list, max size is for both width and
 height

---
 .../java/org/mydomain/myscan/view/DocumentScreen.kt   | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/app/src/main/java/org/mydomain/myscan/view/DocumentScreen.kt b/app/src/main/java/org/mydomain/myscan/view/DocumentScreen.kt
index e85035e..0f8a378 100644
--- a/app/src/main/java/org/mydomain/myscan/view/DocumentScreen.kt
+++ b/app/src/main/java/org/mydomain/myscan/view/DocumentScreen.kt
@@ -185,18 +185,23 @@ private fun PageList(
                 .fillMaxWidth()
                 .padding(vertical = 4.dp)
                 .background(MaterialTheme.colorScheme.secondaryContainer),
-            horizontalArrangement = Arrangement.spacedBy(8.dp)
+            horizontalArrangement = Arrangement.spacedBy(8.dp),
+            verticalAlignment = Alignment.CenterVertically
         ) {
             itemsIndexed (pageIds) { index, id ->
                 // TODO Use small images rather than big ones
                 val bitmap = imageLoader(id).asImageBitmap()
                 val isSelected = index == currentPageIndex.value
                 val borderColor = if (isSelected) MaterialTheme.colorScheme.primary else Color.Transparent
+                val modifier =
+                    if (bitmap.height > bitmap.width)
+                        Modifier.height(120.dp)
+                    else
+                        Modifier.width(120.dp)
                 Image(
                     bitmap = bitmap,
                     contentDescription = null,
-                    modifier = Modifier
-                        .height(120.dp)
+                    modifier = modifier
                         .padding(4.dp)
                         .border(2.dp, borderColor)
                         .clickable { currentPageIndex.value = index }