Merge #2029 'migrate legacy tests'

1 files changed, 30 insertions, 0 deletions

diff --git a/test/functional/legacy/qf_title_spec.lua b/test/functional/legacy/qf_title_spec.lua
new file mode 100644
index 0000000000..aa005117be
--- /dev/null
+++ b/test/functional/legacy/qf_title_spec.lua
@@ -0,0 +1,30 @@
+-- Tests for quickfix window's title
+
+local helpers = require('test.functional.helpers')
+local feed, insert, source = helpers.feed, helpers.insert, helpers.source
+local clear, execute, expect = helpers.clear, helpers.execute, helpers.expect
+
+describe('qf_title', function()
+  setup(clear)
+
+  it('is working', function()
+    insert([[
+      Results of test_qf_title:]])
+
+    source([[
+      set efm=%E%f:%l:%c:%m
+      cgetexpr ['file:1:1:message']
+      let qflist=getqflist()
+      call setqflist(qflist, 'r')
+      copen
+      let g:quickfix_title=w:quickfix_title
+      wincmd p
+      $put =g:quickfix_title
+    ]])
+
+    -- Assert buffer contents.
+    expect([[
+      Results of test_qf_title:
+      :setqflist()]])
+  end)
+end)