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

Diff of /FigKernelPackages/P3WorkspaceClient.pm

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

revision 1.4, Fri Nov 11 20:14:19 2016 UTC revision 1.5, Tue Dec 13 22:45:34 2016 UTC
# Line 2  Line 2 
2    
3  # This is a SAS Component  # This is a SAS Component
4    
5    use P3DataAPI;
6  use POSIX;  use POSIX;
7  no warnings 'redefine';  no warnings 'redefine';
8  use strict;  use strict;
# Line 44  Line 45 
45          client => Bio::P3::Workspace::WorkspaceClient::RpcClient->new,          client => Bio::P3::Workspace::WorkspaceClient::RpcClient->new,
46          url => $url,          url => $url,
47          headers => [],          headers => [],
48            api => P3DataAPI->new(),
49      };      };
50    
51      chomp($self->{hostname} = `hostname`);      chomp($self->{hostname} = `hostname`);
# Line 100  Line 102 
102          {          {
103              $token = $ENV{KB_AUTH_TOKEN};              $token = $ENV{KB_AUTH_TOKEN};
104          }          }
105            elsif ($self->{api}->{token})
106            {
107                $token = $self->{api}->{token};
108            }
109          elsif (open($fh, "<", "$ENV{HOME}/.patric_token"))          elsif (open($fh, "<", "$ENV{HOME}/.patric_token"))
110          {          {
111              $token = <$fh>;              $token = <$fh>;

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3