use strict;
use warnings;
use Test::Most;
use Test::MockObject::Extends;
use lib qw(t/lib);
use MyModel;
my $es = Test::MockObject::Extends->new( ElasticSearch->new );
my $model = MyModel->new( es => $es );
my $tests = {
"0.20.0.RC1" => 0.020000001,
"0.19.11" => 0.019011,
"0.18.1" => 0.018001,
};
while(my ($string, $number) = each %$tests) {
$es->mock( current_server_version => sub { { number => $string } } );
is($model->es_version, $number, "parse $string as $number");
}
done_testing;