From b68fb8fee24f92abaabe8c91c848babc67ad0dea Mon Sep 17 00:00:00 2001
From: Dmitry Karasik <dmitry@karasik.eu.org>
Date: Mon, 16 Sep 2024 18:27:32 +0200
Subject: [PATCH] sort the content of `owner` list

---
 Prima/VB/Classes.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Prima/VB/Classes.pm b/Prima/VB/Classes.pm
index 57f4da23f..e7c8c38d7 100644
--- a/Prima/VB/Classes.pm
+++ b/Prima/VB/Classes.pm
@@ -1783,7 +1783,7 @@ sub set
 			();
 		delete $items{ $self-> {widget}-> name};
 		delete @items{ map { $_-> name } $VB::form-> marked_widgets};
-		$self-> {A}-> items( [ keys %items]);
+		$self-> {A}-> items( [ sort keys %items]);
 		$data = $VB::form-> name unless length $data;
 	}
 	$self-> {A}-> text( $data);