get detection right dammit

diff --git a/layout/data2safety b/layout/data2safety
index 2561498b26d6fa7544d1b0492fa60235c1847be5..95c1eb9666b95d62ea16c68525e7bfbf30251dda 100755 (executable)
--- a/layout/data2safety
+++ b/layout/data2safety
@@ -60,7 +60,7 @@ sub sensepermute_bitmap ($$$) {
     my ($objnum,$bitnum);
     my (@map)= split /\s+/, $mapstring;
     @map==8 or die;
-    $bitnum= 0;
+    $bitnum= $base;
     while (@map) {
        $objnum= pop @map;
        next if $objnum =~ m/[a-z]/i;
@@ -69,6 +69,7 @@ sub sensepermute_bitmap ($$$) {
        die "$kind $objnum ($bitnum from $base)" if
            defined $sensepermute{$kind}[$objnum];
        $sensepermute{$kind}[$objnum]= $bitnum;
+#print STDERR "SPM $kind $objnum $bitnum\n";
        $bitnum++;
     }
 }