From 130a1a6bb296ce21ecb7052fe42d105852b85c59 Mon Sep 17 00:00:00 2001
From: AdnoC <adam.r.cutler@gmail.com>
Date: Tue, 10 May 2016 16:04:09 -0400
Subject: test/syntax: Add testing for linking to cleared highlight groups

---
 test/functional/ui/highlight_spec.lua | 40 +++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

(limited to 'test')

diff --git a/test/functional/ui/highlight_spec.lua b/test/functional/ui/highlight_spec.lua
index 4b0173fa89..06139277b2 100644
--- a/test/functional/ui/highlight_spec.lua
+++ b/test/functional/ui/highlight_spec.lua
@@ -262,4 +262,44 @@ describe('Default highlight groups', function()
     ]], {[1] = {bold = true, foreground = hlgroup_colors.Question}})
     feed('<cr>') --  skip the "Press ENTER..." state or tests will hang
   end)
+  it('can be cleared and linked to other highlight groups', function()
+    execute('highlight clear ModeMsg')
+    feed('i')
+    screen:expect([[
+      ^                                                     |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      -- INSERT --                                         |
+    ]], {})
+    feed('<esc>')
+    execute('highlight CustomHLGroup guifg=red guibg=green')
+    execute('highlight link ModeMsg CustomHLGroup')
+    feed('i')
+    screen:expect([[
+      ^                                                     |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      ~                                                    |
+      {1:-- INSERT --}                                         |
+    ]], {[1] = {foreground = Screen.colors.Red, background = Screen.colors.Green}})
+  end)
 end)
-- 
cgit