X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c1b893b857c7f9a001c401cf45deec6daa2a9aa4..dbe8796e044611c3d0f0f83b2f2e152e339acd48:/tools/mkdigraphs-rfc diff --git a/tools/mkdigraphs-rfc b/tools/mkdigraphs-rfc index d33503d..007e7b0 100755 --- a/tools/mkdigraphs-rfc +++ b/tools/mkdigraphs-rfc @@ -56,8 +56,9 @@ my %replace = ( do { $_ = readline; defined or die "Premature input end"; -} until /^\s\S/; +} until s/^\s(?=\S)//; +chomp; my @line = $_; # add first line (already read, assume it's ok) # read the rest of the character table