chiark / gitweb /
list: topo order puts deps before clients
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 23 Jan 2012 01:41:53 +0000 (01:41 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 23 Jan 2012 01:41:53 +0000 (01:41 +0000)
tb-list.pl

index 1e95270..9b76473 100755 (executable)
@@ -150,7 +150,7 @@ sub sortsub () {
            foreach my $ix (qw(0 1)) {
                my $ab = (qw(a b))[$ix];
                my $ba = (qw(b a))[$ix];
-               my $r = (qw(-1 1))[$ix];
+               my $r = (qw(1 -1))[$ix];
                $txt .= "    return $r if \$v${ab}->{Info}[3]{\$$ba};\n";
            }
         } else {