Changeset 22659
- Timestamp:
- 02/09/10 22:59:31 (17 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/mnw21/pathquery_refactor/intermine/perl/lib/InterMine.pm
r22533 r22659 67 67 sub import { 68 68 my $class = shift; 69 my ($url, $user, $pass) = @_ 69 my ($url, $user, $pass) = @_; 70 70 if ($url) { 71 71 $service_url = $url; … … 150 150 $pass_for{$url} = $pass; 151 151 } 152 my $service = InterMine::Service->new($url , $user, $pass);152 my $service = InterMine::Service->new($url);#, $user, $pass); 153 153 $services{$url} = $service; 154 154 return $service;
Note: See TracChangeset
for help on using the changeset viewer.
