[Bio] / FigKernelPackages / FIG.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/FIG.pm

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

revision 1.730, Thu Oct 16 20:04:16 2008 UTC revision 1.731, Sat Oct 18 10:18:41 2008 UTC
# Line 222  Line 222 
222      } elsif ($FIG_Config::attrURL) {      } elsif ($FIG_Config::attrURL) {
223          Trace("Remote attribute server $FIG_Config::attrURL chosen.") if T(3);          Trace("Remote attribute server $FIG_Config::attrURL chosen.") if T(3);
224          $self->{_ca} = RemoteCustomAttributes->new($FIG_Config::attrURL);          $self->{_ca} = RemoteCustomAttributes->new($FIG_Config::attrURL);
225      } elsif ($FIG_Config::attrDbName) {      } elsif ($FIG_Config::attrDbName && $FIG_Config::attrHost) {
226          eval {          eval {
227              Trace("Local attribute database $FIG_Config::attrDbName chosen.") if T(3);              Trace("Local attribute database $FIG_Config::attrDbName chosen.") if T(3);
228              my $user = ($FIG_Config::arch eq 'win' ? 'self' : scalar(getpwent()));              my $user = ($FIG_Config::arch eq 'win' ? 'self' : scalar(getpwent()));
# Line 238  Line 238 
238      # create a handle for that as well.      # create a handle for that as well.
239      #      #
240    
241      if (defined($FIG_Config::readonly_dbhost))      if (defined($FIG_Config::readonly_dbhost)) {
     {  
242          my $ro = new DBrtns($FIG_Config::dbms, $FIG_Config::readonly_db, $FIG_Config::readonly_dbuser,          my $ro = new DBrtns($FIG_Config::dbms, $FIG_Config::readonly_db, $FIG_Config::readonly_dbuser,
243                              $FIG_Config::readonly_dbpass, $FIG_Config::readonly_dbport, $FIG_Config::readonly_dbhost,                              $FIG_Config::readonly_dbpass, $FIG_Config::readonly_dbport, $FIG_Config::readonly_dbhost,
244                              $FIG_Config::readonly_dbsock);                              $FIG_Config::readonly_dbsock);

Legend:
Removed from v.1.730  
changed lines
  Added in v.1.731

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3