From f413f49f006e95281f619a7bd930d0d2b9535444 Mon Sep 17 00:00:00 2001
From: Dmitry Karasik <dmitry@karasik.eu.org>
Date: Sun, 6 Oct 2024 20:41:49 +0200
Subject: [PATCH] center the radio check mark

---
 Prima/Menus.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Prima/Menus.pm b/Prima/Menus.pm
index 84bdbfb8..db16d1cd 100644
--- a/Prima/Menus.pm
+++ b/Prima/Menus.pm
@@ -259,6 +259,7 @@ sub draw
 		$Y -= $Xw;
 		if ( $self->group > 0 ) {
 			my $D = $em / 2;
+			$Y -= $D / 2;
 			$draw_radio =  [
 				$X, $Y, $X + $D, $Y + $D, $X + $D * 2, $Y, $X + $D, $Y - $D
 			];