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

Diff of /FigKernelPackages/ACHserver.pm

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

revision 1.13, Mon Nov 30 11:45:22 2009 UTC revision 1.14, Tue Dec 1 20:57:02 2009 UTC
# Line 67  Line 67 
67      # Get the parameters.      # Get the parameters.
68      my ($class, %options) = @_;      my ($class, %options) = @_;
69      # Compute the URL.      # Compute the URL.
70      $options{url} = "http://servers.nmpdr.org/ach/server.cgi" if ! defined $options{url};      $options{url} = "http://servers.nmpdr.org/ach/server.cgi" if $options{url} eq '';
71      # Construct the subclass.      # Construct the subclass.
72      return $class->SUPER::new(ACH => %options);      return $class->SUPER::new(ACH => %options);
73  }  }

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3