Skip to content
Snippets Groups Projects
Commit 17f39562 authored by Gerhard Gonter's avatar Gerhard Gonter :speech_balloon:
Browse files

added TODO/comment about store information in MongoDB backend

parent 48e1d365
No related branches found
No related tags found
No related merge requests found
...@@ -58,6 +58,7 @@ while (my $arg= shift (@ARGV)) ...@@ -58,6 +58,7 @@ while (my $arg= shift (@ARGV))
if ($arg eq '--project') { $project= shift (@ARGV); } if ($arg eq '--project') { $project= shift (@ARGV); }
elsif ($arg eq '--store') { $store= shift (@ARGV); } elsif ($arg eq '--store') { $store= shift (@ARGV); }
elsif ($arg eq '--fileinfo') { $refresh_fileinfo= 1; } 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 =~ /^--(refresh|verify|lookup|edit)$/) { $op_mode= $1; }
} }
elsif ($arg =~ /^-/) elsif ($arg =~ /^-/)
...@@ -128,6 +129,17 @@ elsif ($op_mode eq 'lookup') ...@@ -128,6 +129,17 @@ elsif ($op_mode eq 'lookup')
print "res: ", Dumper ($res); 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); # print "objreg: (after refresh)", Dumper ($objreg);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment