1 files changed, 27 insertions, 14 deletions
diff --git a/test/functional/provider/perl_spec.lua b/test/functional/provider/perl_spec.lua
index 8049f0f3e2..e9a031eb07 100644
--- a/test/functional/provider/perl_spec.lua
+++ b/test/functional/provider/perl_spec.lua
@@ -5,7 +5,7 @@ local command = helpers.command
 local write_file = helpers.write_file
 local eval = helpers.eval
 local retry = helpers.retry
-local meths = helpers.meths
+local api = helpers.api
 local insert = helpers.insert
 local expect = helpers.expect
 local feed = helpers.feed
@@ -14,7 +14,10 @@ do
   clear()
   local reason = missing_provider('perl')
   if reason then
-    pending(string.format("Missing perl host, or perl version is too old (%s)", reason), function() end)
+    pending(
+      string.format('Missing perl host, or perl version is too old (%s)', reason),
+      function() end
+    )
     return
   end
 end
@@ -30,7 +33,7 @@ describe('legacy perl provider', function()
 
   it(':perl command', function()
     command('perl $vim->vars->{set_by_perl} = [100, 0];')
-    eq({100, 0}, eval('g:set_by_perl'))
+    eq({ 100, 0 }, eval('g:set_by_perl'))
   end)
 
   it(':perlfile command', function()
@@ -45,7 +48,7 @@ describe('legacy perl provider', function()
     -- :perldo 1; doesn't change $_,
     -- the buffer should not be changed
     command('normal :perldo 1;')
-    eq(false, meths.get_option_value('modified', {}))
+    eq(false, api.nvim_get_option_value('modified', {}))
     -- insert some text
     insert('abc\ndef\nghi')
     expect([[
@@ -61,19 +64,21 @@ describe('legacy perl provider', function()
   end)
 
   it('perleval()', function()
-    eq({1, 2, {['key'] = 'val'}}, eval([[perleval('[1, 2, {"key" => "val"}]')]]))
+    eq({ 1, 2, { ['key'] = 'val' } }, eval([[perleval('[1, 2, {"key" => "val"}]')]]))
   end)
 end)
 
 describe('perl provider', function()
-  teardown(function ()
+  teardown(function()
     os.remove('Xtest-perl-hello.pl')
     os.remove('Xtest-perl-hello-plugin.pl')
   end)
 
   it('works', function()
     local fname = 'Xtest-perl-hello.pl'
-    write_file(fname, [[
+    write_file(
+      fname,
+      [[
       package main;
       use strict;
       use warnings;
@@ -84,14 +89,19 @@ describe('perl provider', function()
       my $nvim = Neovim::Ext::from_session($session);
       $nvim->command('let g:job_out = "hello"');
       1;
-    ]])
-    command('let g:job_id = jobstart(["perl", "'..fname..'"])')
-    retry(nil, 3000, function() eq('hello', eval('g:job_out')) end)
+    ]]
+    )
+    command('let g:job_id = jobstart(["perl", "' .. fname .. '"])')
+    retry(nil, 3000, function()
+      eq('hello', eval('g:job_out'))
+    end)
   end)
 
   it('plugin works', function()
     local fname = 'Xtest-perl-hello-plugin.pl'
-    write_file(fname, [[
+    write_file(
+      fname,
+      [[
       package TestPlugin;
       use strict;
       use warnings;
@@ -118,8 +128,11 @@ describe('perl provider', function()
       my $plugin = TestPlugin->new($nvim);
       $plugin->test_command();
       1;
-    ]])
-    command('let g:job_id = jobstart(["perl", "'..fname..'"])')
-    retry(nil, 3000, function() eq('hello-plugin', eval('g:job_out')) end)
+    ]]
+    )
+    command('let g:job_id = jobstart(["perl", "' .. fname .. '"])')
+    retry(nil, 3000, function()
+      eq('hello-plugin', eval('g:job_out'))
+    end)
   end)
 end)