[Bio] / Sprout / LoadSproutTables.pl Repository:
ViewVC logotype

Diff of /Sprout/LoadSproutTables.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9, Thu Oct 13 15:28:53 2005 UTC revision 1.10, Thu Oct 20 09:31:30 2005 UTC
# Line 92  Line 92 
92    
93  Only generate the B<Feature> and B<IsLocatedIn> tables when processing the feature group.  Only generate the B<Feature> and B<IsLocatedIn> tables when processing the feature group.
94    
95    =item dbLoad
96    
97    If TRUE, the database tables will be loaded automatically from the load files created.
98    
99  =back  =back
100    
101  =cut  =cut
# Line 110  Line 114 
114    
115  # Get the command-line parameters and options.  # Get the command-line parameters and options.
116  my ($options, @parameters) = Tracer::ParseCommand({ geneFile => "", subsysFile => "",  my ($options, @parameters) = Tracer::ParseCommand({ geneFile => "", subsysFile => "",
117                                                      trace => 3, limitedFeatures => 0 },                                                      trace => 3, limitedFeatures => 0,
118                                                                 @ARGV);                                                      dbLoad => 0 }, @ARGV);
119  # Set up tracing.  # Set up tracing.
120  TSetup("$options->{trace} SproutLoad ERDBLoad ERDB Stats Tracer Load", "+>$FIG_Config::temp/trace.log");  TSetup("$options->{trace} SproutLoad ERDBLoad ERDB Stats Tracer Load", "+>$FIG_Config::temp/trace.log");
121  # Create the sprout loader object. Note that the Sprout object does not  # Create the sprout loader object. Note that the Sprout object does not
122  # open the database (that's what the "1" does in the fourth parameter).  # open the database unless the "dbLoad" option is turned on.
123  my $fig = FIG->new();  my $fig = FIG->new();
124  my $sprout = SFXlate->new_sprout_only(undef, undef, undef, 1);  my $sprout = SFXlate->new_sprout_only(undef, undef, undef, ! $options->{dbLoad});
125  my $spl = SproutLoad->new($sprout, $fig, $options->{geneFile}, $options->{subsysFile}, $options);  my $spl = SproutLoad->new($sprout, $fig, $options->{geneFile}, $options->{subsysFile}, $options);
126  # Process the parameters.  # Process the parameters.
127  for my $group (@parameters) {  for my $group (@parameters) {

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3