From d18a8519e48bd2e96a42da13e67b54dfeeabfc38 Mon Sep 17 00:00:00 2001 From: Ben Harris Date: Sat, 16 May 2020 12:21:50 +0100 Subject: [PATCH] Fix the APL Greek letters, which were a mess --- bedstead.c | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/bedstead.c b/bedstead.c index fa91a35..5a932a0 100644 --- a/bedstead.c +++ b/bedstead.c @@ -1310,11 +1310,10 @@ static struct glyph { {{010,025,002,000,004,012,021,000,000}, U(2372) }, /* APL nand */ {{000,000,014,004,004,004,002,000,000}, U(2373) }, /* APL iota */ {{000,000,016,021,021,021,036,020,020}, U(2374) }, /* APL rho */ - {{000,000,014,004,004,004,002,000,037}, U(2373) }, /* APL iota underbar */ {{000,000,012,021,025,025,012,000,000}, U(2375) }, /* APL omega */ - {{000,000,014,004,004,004,002,000,037}, U(2373) }, /* APL iota underbar */ - {{000,000,015,022,022,022,015,000,037}, U(237A) }, /* APL alpha underbar */ + {{000,000,015,022,022,022,015,000,037}, U(2376) }, /* APL alpha underbar */ {{017,020,037,020,017,000,037,000,000}, U(2377) }, /* APL epsilon underbar */ + {{000,000,014,004,004,004,002,000,037}, U(2378) }, /* APL iota underbar */ {{000,000,012,021,025,025,012,000,037}, U(2379) }, /* APL omega underbar*/ {{000,000,015,022,022,022,015,000,000}, U(237A) }, /* APL alpha */ {{000,000,005,002,025,010,000,000,000}, U(237B) }, /* crossed tick (NAK) */ -- 2.30.2