diff --git a/textarchive/lib/TA/ObjReg.pm b/textarchive/lib/TA/ObjReg.pm
index 7f8c697f7356d6ddd031d37c761a461340ea281d..5af38cea35dba3c947db2118c81380949bb7aa66 100644
--- a/textarchive/lib/TA/ObjReg.pm
+++ b/textarchive/lib/TA/ObjReg.pm
@@ -246,7 +246,7 @@ print "sub verify_toc_v1\n";
   my @extra_fields= (exists ($reg->{'toc_extra_fields'})) ? $reg->{'toc_extra_fields'} : ();
 
   # TODO: this is specific for vlib001.pl, this should be a passed as code ref!
-  my @hdr= qw(seq found paths path mtime fs_size ino);
+  my @hdr= qw(seq found path_count path mtime fs_size ino);
 
   my $c= $reg->{'proj_cat'};
   # pick up current tocs to see if the sequence needs to be updated