From e5c4c4bca20678e6c621847f370701945ce625db Mon Sep 17 00:00:00 2001
From: Björn Linse <bjorn.linse@gmail.com>
Date: Sun, 22 Mar 2015 14:18:35 +0100
Subject: test/ui: add redraw debug util

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

diff --git a/test/functional/ui/screen.lua b/test/functional/ui/screen.lua
index 174538df6e..6c23611c07 100644
--- a/test/functional/ui/screen.lua
+++ b/test/functional/ui/screen.lua
@@ -456,6 +456,24 @@ end
 function Screen:snapshot_util(attrs, ignore)
   -- util to generate screen test
   pcall(function() self:wait(function() return "error" end, 250) end)
+  self:print_snapshot(attrs, ignore)
+end
+
+function Screen:redraw_debug(attrs, ignore)
+  self:print_snapshot(attrs, ignore)
+  local function notification_cb(method, args)
+    assert(method == 'redraw')
+    for _, update in ipairs(args) do
+      print(require('inspect')(update))
+    end
+    self:_redraw(args)
+    self:print_snapshot(attrs, ignore)
+    return true
+  end
+  run(nil, notification_cb, nil, 250)
+end
+
+function Screen:print_snapshot(attrs, ignore)
   if ignore == nil then
     ignore = self._default_attr_ignore
   end
-- 
cgit