screen: setup scrolling main screen when starting with display-=msgsep

1 files changed, 36 insertions, 8 deletions

diff --git a/test/functional/ui/screen_basic_spec.lua b/test/functional/ui/screen_basic_spec.lua
index ff9f30d0a1..958e137f65 100644
--- a/test/functional/ui/screen_basic_spec.lua
+++ b/test/functional/ui/screen_basic_spec.lua
@@ -24,10 +24,6 @@ describe('screen', function()
     } )
   end)
 
-  after_each(function()
-    screen:detach()
-  end)
-
   it('default initial screen', function()
       screen:expect([[
       ^                                                     |
@@ -67,10 +63,6 @@ local function screen_tests(linegrid)
     } )
   end)
 
-  after_each(function()
-    screen:detach()
-  end)
-
   describe(':suspend', function()
     it('is forwarded to the UI', function()
       local function check()
@@ -1004,3 +996,39 @@ describe('Screen default colors', function()
     end}
   end)
 end)
+
+
+describe('screen with msgsep deactivated on startup', function()
+  local screen
+
+  before_each(function()
+    clear('--cmd', 'set display-=msgsep')
+    screen = Screen.new()
+    screen:attach()
+    screen:set_default_attr_ids {
+      [0] = {bold=true, foreground=255};
+      [7] = {bold = true, foreground = Screen.colors.SeaGreen};
+    }
+  end)
+
+  it('execute command with multi-line output', function()
+    feed ':ls<cr>'
+    screen:expect([[
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      {0:~                                                    }|
+      :ls                                                  |
+        1 %a   "[No Name]"                    line 1       |
+      {7:Press ENTER or type command to continue}^              |
+    ]])
+    feed '<cr>'  -- skip the "Press ENTER..." state or tests will hang
+  end)
+end)