Enlarge radius of box drawings arcs

Before, the diagonal parts were the same as in the capital O.  But that
was already a bit square, and the shapes one would draw with the box
drawing characters will generally be bigger.  So now I've cut a bit more
off the corners.  This means that arcs that join to the right need the
recent change to add JOIN_R in order to join up properly.

With this change, if you try to draw a circle with them, you get an
octagon with side lengths 2, 2.8, 6 instead of 4, 1.4, 8, which I think
is an improvement.

diff --git a/bedstead.c b/bedstead.c
index f2143000a7adcef775ad8b9de0549aab1f02803f..7d98eaea29ea92f242bb050088122cd94e06c595 100644 (file)
--- a/bedstead.c
+++ b/bedstead.c
@@ -2256,10 +2256,10 @@ static struct glyph {
  {"\04\04\04\37\04\37\04\04\04", 0x256a, "SF540000", JOIN },
  {"\12\12\12\12\37\12\12\12\12", 0x256b, "SF530000", JOIN },
  {"\12\12\12\33\00\33\12\12\12", 0x256c, "SF440000", JOIN },
- {"\00\00\00\00\03\04\04\04\04", U(256D), JOIN },
- {"\00\00\00\00\30\04\04\04\04", U(256E), JOIN },
- {"\04\04\04\04\30\00\00\00\00", U(256F), JOIN },
- {"\04\04\04\04\03\00\00\00\00", U(2570), JOIN },
+ {"\00\00\00\00\01\02\04\04\04", U(256D), JOIN },
+ {"\00\00\00\00\20\10\04\04\04", U(256E), JOIN },
+ {"\04\04\04\10\20\00\00\00\00", U(256F), JOIN },
+ {"\04\04\04\02\01\00\00\00\00", U(2570), JOIN },
  {"\00\00\00\00\34\00\00\00\00", U(2574), JOIN },
  {"\04\04\04\04\04\00\00\00\00", U(2575), JOIN },
  {"\00\00\00\00\07\00\00\00\00", U(2576), JOIN },