]> git.sur5r.net Git - i3/i3/blobdiff - testcases/t/271-for_window_tilingfloating.t
tests: use i3_config arg instead of precisely one launch_with_config
[i3/i3] / testcases / t / 271-for_window_tilingfloating.t
index 760ac53ea0c987384719488de75c23f076a81bd4..d480a85e7c932b94c5216566e60547a23603e5ce 100644 (file)
 # • http://onyxneon.com/books/modern_perl/modern_perl_a4.pdf
 #   (unless you are already familiar with Perl)
 #
-use i3test i3_autostart => 0;
-use X11::XCB qw(PROP_MODE_REPLACE);
-
-##############################################################
-# 13: check that the tiling / floating criteria work.
-##############################################################
-
-my $config = <<"EOT";
+use i3test i3_config => <<EOT;
 # i3 config file (v4)
 font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
 for_window [tiling] mark tiled
 for_window [floating] mark floated
 EOT
+use X11::XCB qw(PROP_MODE_REPLACE);
+
+##############################################################
+# 13: check that the tiling / floating criteria work.
+##############################################################
 
-my $pid = launch_with_config($config);
 my $tmp = fresh_workspace;
 
 open_window;
@@ -42,8 +39,6 @@ is_deeply($nodes[0]->{marks}, [ 'tiled' ], "mark set for 'tiling' criterion");
 cmp_ok(@nodes, '==', 1, 'one floating container on this workspace');
 is_deeply($nodes[0]->{nodes}[0]->{marks}, [ 'floated' ], "mark set for 'floating' criterion");
 
-exit_gracefully($pid);
-
 ##############################################################
 
 done_testing;