--- a/tools/rb/find-leakers.pl
+++ b/tools/rb/find-leakers.pl
@@ -62,26 +62,26 @@ LINE: while (<>) {
     }
     elsif ($op eq 'Release' && $cnt == 0) {
         # Example: <nsStringBuffer> 0x01AFD3B8 1 Release 0
 
         delete($allocs{$obj});
         delete($classes{$obj});
     }
     elsif ($op eq 'Ctor') {
-	# Example: <PStreamNotifyParent> 0x08880BD0 8 Ctor (20)
+        # Example: <PStreamNotifyParent> 0x08880BD0 8 Ctor (20)
 
-	$allocs{$obj} = ++$counter{$class};
-	$classes{$obj} = $class;
+        $allocs{$obj} = ++$counter{$class};
+        $classes{$obj} = $class;
     }
     elsif ($op eq 'Dtor') {
-	# Example: <PStreamNotifyParent> 0x08880BD0 8 Dtor (20)
+        # Example: <PStreamNotifyParent> 0x08880BD0 8 Dtor (20)
 
-	delete($allocs{$obj});
-	delete($classes{$obj});
+        delete($allocs{$obj});
+        delete($classes{$obj});
     }
 }
 
 
 sub sort_by_value {
     my %x = @_;
     sub _by_value($) { my %x = @_; $x{$a} cmp $x{$b}; } 
     sort _by_value keys(%x);