diff --git a/textarchive/vlib001.pl b/textarchive/vlib001.pl index 76c1d1062e6b0232dbd41648f04375dbc1293157..98792398d90785a40f983159cd41a25db27e1de0 100755 --- a/textarchive/vlib001.pl +++ b/textarchive/vlib001.pl @@ -58,6 +58,7 @@ while (my $arg= shift (@ARGV)) if ($arg eq '--project') { $project= shift (@ARGV); } elsif ($arg eq '--store') { $store= shift (@ARGV); } elsif ($arg eq '--fileinfo') { $refresh_fileinfo= 1; } + elsif ($arg eq '--maint') { $op_mode= 'maint'; } elsif ($arg =~ /^--(refresh|verify|lookup|edit)$/) { $op_mode= $1; } } elsif ($arg =~ /^-/) @@ -128,6 +129,17 @@ elsif ($op_mode eq 'lookup') print "res: ", Dumper ($res); } } +elsif ($op_mode eq 'maint') +{ + +=begin comment + +For MongoDB backend: synchronize information about stores with maint collection + +=end comment +=cut + +} # print "objreg: (after refresh)", Dumper ($objreg);