From a383a24bac535903ac1dc12243a89ad9701eb4a9 Mon Sep 17 00:00:00 2001
From: Lionel Draghi <lionel.draghi@free.fr>
Date: Sun, 23 Mar 2025 13:19:52 +0100
Subject: [PATCH] fix: missing space on image of test property with Id field
 (#1918)

---
 src/alire/alire-properties-tests.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/alire/alire-properties-tests.ads b/src/alire/alire-properties-tests.ads
index 0b7462dc..d4104ffa 100644
--- a/src/alire/alire-properties-tests.ads
+++ b/src/alire/alire-properties-tests.ads
@@ -59,7 +59,7 @@ private
    overriding
    function Image (S : Settings) return String
    is (" test runner"
-       & (if Id (S) = "" then "" else ("'" & Id (S) & "'"))
+       & (if Id (S) = "" then "" else (" '" & Id (S) & "'"))
        & ": "
        & (case S.Runner.Kind is
             when Alire_Runner => "alire",
-- 
2.39.5