Commit a7ce54b2 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix for dealing with the Version return from newer CMs.

parent bab97a0c
......@@ -27,6 +27,7 @@ use English;
use overload ('""' => 'Stringify');
use XML::Simple;
use Date::Parse;
use Data::Dumper;
# Configure variables
my $TB = "@prefix@";
......@@ -327,8 +328,13 @@ sub Version($)
print STDERR " " . $response->output() . "\n";
return undef;
}
$self->{'version'} = $response->value();
return $response->value();
if (ref($response->value())) {
$self->{'version'} = $response->value()->{'api'};
}
else {
$self->{'version'} = $response->value();
}
return $self->{'version'};
}
#
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment