X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/01c47091040e8e84d64b8f2b0b395f47bad139c4..d9f4d90b375dff1f13d0029522181d5b2781bec7:/digraphs.plp

diff --git a/digraphs.plp b/digraphs.plp
index d339b09..81944b2 100644
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -41,7 +41,7 @@ my @chars = (
 	['A'..'M'], ['N'..'Z'],
 	['a'..'m'], ['n'..'z'],
 );
-my @chars2 = (@chars, ['_']);  # trailing character (extended set)
+my @chars2 = (['_'], @chars);  # trailing character (extended set)
 
 print '<table><col>';
 print qq'<colgroup span="$_">' for map {scalar @$_} @chars2;