From: Sascha Kruse Date: Wed, 3 Oct 2012 01:52:57 +0000 (+0200) Subject: set workspace_layout in create_workspace_on_output X-Git-Tag: 4.4~87^2^2 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=507898484f2d4ccf7e1077cf8881d4655745ac8c;p=i3%2Fi3 set workspace_layout in create_workspace_on_output fixes #835 --- diff --git a/src/workspace.c b/src/workspace.c index 94efd47b..2b7b19e5 100644 --- a/src/workspace.c +++ b/src/workspace.c @@ -212,6 +212,7 @@ Con *create_workspace_on_output(Output *output, Con *content) { ws->fullscreen_mode = CF_OUTPUT; + ws->workspace_layout = config.default_layout; _workspace_apply_default_orientation(ws); return ws; diff --git a/testcases/t/509-workspace_layout.t b/testcases/t/509-workspace_layout.t new file mode 100644 index 00000000..d5cd3800 --- /dev/null +++ b/testcases/t/509-workspace_layout.t @@ -0,0 +1,43 @@ +#!perl +# vim:ts=4:sw=4:expandtab +# +# Please read the following documents before working on tests: +# • http://build.i3wm.org/docs/testsuite.html +# (or docs/testsuite) +# +# • http://build.i3wm.org/docs/lib-i3test.html +# (alternatively: perldoc ./testcases/lib/i3test.pm) +# +# • http://build.i3wm.org/docs/ipc.html +# (or docs/ipc) +# +# • http://onyxneon.com/books/modern_perl/modern_perl_a4.pdf +# (unless you are already familiar with Perl) +# +# Tests whether workspace_layout is properly set after startup. +# +use List::Util qw(first); +use i3test i3_autostart => 0; + +my $config = <{workspace_layout}, 'tabbed', 'workspace layout is "tabbed"'); + + +exit_gracefully($pid); + +done_testing;