X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/ef1048178fa3bc0d43f4e2bbbee58530f8b0e55c..777198d5e254e56477f141b5ee693b5b6be524e6:/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;