[Bio] / Sprout / Sapling.pm Repository:
ViewVC logotype

Diff of /Sprout/Sapling.pm

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

revision 1.4, Mon Mar 2 22:29:03 2009 UTC revision 1.5, Wed Mar 4 00:08:55 2009 UTC
# Line 184  Line 184 
184      # Get the parameters.      # Get the parameters.
185      my ($class, %options) = @_;      my ($class, %options) = @_;
186      # Get the options.      # Get the options.
187      my $loadDirectory = $options{loadDirectory} || $FIG_Config::saplingData;      my $loadDirectory = $options{loadDirectory} || $FIG_Config::saplingData ||
188      my $dbd = $options{dbd} || "$FIG_Config::fig/SaplingDBD.xml";                          "$FIG_Config::fig/SaplingData";
189        my $dbd = $options{dbd} || "$loadDirectory/SaplingDBD.xml";
190      my $dbName = $options{dbName} || "nmpdr_sapling";      my $dbName = $options{dbName} || "nmpdr_sapling";
191      my $sock = $options{sock} || "$FIG_Config::sproutSock";      my $sock = $options{sock} || "$FIG_Config::sproutSock" || "";
192      my $userData = $options{userData} || "seed/";      my $userData = $options{userData} || "seed/";
193      my $dbhost = $options{dbhost} || $FIG_Config::saplingHost || "localhost";      my $dbhost = $options{dbhost} || $FIG_Config::saplingHost || "localhost";
194      # Compute the user name and password.      # Compute the user name and password.
# Line 599  Line 600 
600    
601  sub LoadGroupList {  sub LoadGroupList {
602      # Return the list.      # Return the list.
603      return qw(Genome Feature Subsystem Family Scenario); # ##TODO Model, Drug, Protein      return qw(Genome Feature Subsystem Family Scenario Model); # ##TODO Drug, Protein
604  }  }
605    
606  =head3 LoadDirectory  =head3 LoadDirectory

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3