X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/4268fe1b48ef3f5951c401477b20cd1300e07536..f1b14de9ebe722dfb26594fe50d66e1c2db6471f:/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