Index: Texinfo/Convert/Info.pm
===================================================================
--- Texinfo/Convert/Info.pm	(révision 5332)
+++ Texinfo/Convert/Info.pm	(copie de travail)
@@ -167,6 +167,19 @@
                @{$self->{'opened_files'}};
           push @{$self->{'opened_files'}}, 
                    $self->{'output_file'}.'-'.$out_file_nr;
+          # find first node count
+          my $first_node;
+          foreach my $label (@{$self->{'count_context'}->[-1]->{'locations'}}) {
+            next unless ($label->{'root'} and $label->{'root'}->{'extra'} 
+                         and defined($label->{'root'}->{'extra'}->{'normalized'}));
+            if ($label->{'root'}->{'cmdname'} eq 'node') {
+              $first_node = $label;
+              last;
+            }
+          }
+          if ($first_node) {
+            $first_node_bytes_count = $first_node->{'bytes'};
+          }
           push @indirect_files, [$self->{'output_filename'}.'-'.$out_file_nr,
                                  $first_node_bytes_count];
           #print STDERR join(' --> ', @{$indirect_files[-1]}) ."\n";