From 99bdf66320e0a970c00ad7811cd4e496cef517ab Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 25 Jan 2011 15:19:44 +0000
Subject: [PATCH] canon: unbreak qtydiff

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

diff --git a/yarrg/canon b/yarrg/canon
index e756297..590ffa8 100755
--- a/yarrg/canon
+++ b/yarrg/canon
@@ -69,7 +69,7 @@ foreach my $k (sort keys %s) {
         next;
     }
     # base62-encoding all these numbers saves about 8%
-    my $qtydiff= $r[2] - ($r[0] || 0);
+    my $qtydiff= $r[3] - ($r[1] || 0);
     if (!defined($r[0]) || $r[0] != $r[2]) {
         $prep->();
         printf "\@%s",alencodenum($r[2]);
-- 
2.30.2