From 4b4bc68b4719041a688b2d6ac95adad08e25ae3e Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 25 Jan 2011 15:21:24 +0000
Subject: [PATCH] canon: show commod assignments

---
 yarrg/canon | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/yarrg/canon b/yarrg/canon
index bb4d0ca..1ba6b02 100755
--- a/yarrg/canon
+++ b/yarrg/canon
@@ -40,7 +40,7 @@ sub findcommod ($) {
     my $me= $commodmap{$cname};  return $me if defined $me;
     my $val= $nextcommod++;
     $commodmap{$cname}= $val;
-#    printf "%s:%s\n", $res,$cname;
+    printf "%s:%s\n", alencodenum($val),$cname;
     return $val;
 }
 
-- 
2.30.2