From c078fd68ec023200994197035b777587946f5fda Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 19 Feb 2024 11:15:32 +0100
Subject: [PATCH] keyboard/altgr/symbolics: distinguish greek letters from
 symbols

Replace unused mode g5 to split up g6.
---
 keyboard/altgr/symbolics.eng.inc.pl | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/keyboard/altgr/symbolics.eng.inc.pl b/keyboard/altgr/symbolics.eng.inc.pl
index dc6ebcd..b0c3a1e 100644
--- a/keyboard/altgr/symbolics.eng.inc.pl
+++ b/keyboard/altgr/symbolics.eng.inc.pl
@@ -106,9 +106,17 @@ my %rows = (
   '|' => "\x{2309}",
 );
 
+my $groups = kbchars(\%rows);
+$groups->{flag}->{g5} = [greek =>
+	"a different greek letter not corresponding with latin transcription"
+];
+while (my ($key, $chr) = each %rows) {
+	$groups->{def}->{''}->{$key} =~ s/g6/g5/ if $chr =~ /\A\p{Greek}/;
+}
+
 +{
-	%{ kbchars(\%rows) },
-	version => '1.0',
+	%{$groups},
+	version => '1.1',
 	title => 'US Symbolics',
 	category => 'specialised/greek/xorg',
 	intro => join("\n",
-- 
2.30.0