testcases/t/132-move-workspace.t

33     my $tmp2 = get_unused_workspace();
42     cmd "workspace $tmp2";
43     is_num_children($tmp2, 0, 'no containers on second ws yet');
47     cmd "$movecmd $tmp2";
49     is_num_children($tmp2, 1, 'one container on second ws');
50     my ($nodes, $focus) = get_ws_content($tmp2);
114 my $tmp2 = get_unused_workspace();
121 cmd "workspace $tmp2";
122 is_num_children($tmp2, 0, 'no containers yet');
124 is_num_children($tmp2, 1, 'one container on second ws');
130 is_num_children($tmp2, 2, 'two containers on second ws');
133 cmd "workspace $tmp2";
137 is_num_children($tmp2, 0, 'no containers on second ws');
144 $tmp2 = get_unused_workspace();
150 cmd "workspace $tmp2";
151 is_num_children($tmp2, 0, 'no containers yet');
153 cmd qq|[title="win-name"] move workspace $tmp2|;
154 is_num_children($tmp2, 1, 'one container on second ws');
157 is_num_children($tmp2, 0, 'no containers on second ws');
165 $tmp2 = get_unused_workspace();
175 cmd "move workspace $tmp2";
177 $ws = get_ws($tmp2);
225 $tmp2 = get_unused_workspace();
231 cmd "workspace $tmp2";
233 is_num_children($tmp2, 1, 'one container on second ws');
235 is_num_children($tmp2, 2, 'two containers on second ws');
242 is_num_children($tmp2, 0, 'no containers on second ws');
262 $tmp2 = get_unused_workspace();
268 cmd "workspace $tmp2";
270 is_num_children($tmp2, 1, 'one container on second ws');
272 is_num_children($tmp2, 2, 'two containers on second ws');
279 is_num_children($tmp2, 0, 'no containers on second ws');
304 $tmp2 = get_unused_workspace();
317 cmd "move workspace $tmp2";
319 $ws = get_ws($tmp2);
320 is_num_children($tmp2, 1, 'one container on second workspace');
326 $tmp2 = get_unused_workspace();
336 cmd "move workspace $tmp2";
338 $ws = get_ws($tmp2);
339 is_num_children($tmp2, 0, 'no regular nodes on second workspace');
348 $tmp2 = fresh_workspace;
351 $ws = get_ws($tmp2);
357 cmd "move workspace $tmp2";
359 $ws = get_ws($tmp2);
360 is_num_children($tmp2, 1, 'one regular node on second workspace');
361 is_num_fullscreen($tmp2, 1, 'one fullscreen node on second workspace');
369 $tmp2 = fresh_workspace;
372 $ws = get_ws($tmp2);
381 cmd "[con_mark=a] move workspace $tmp2";
383 $ws = get_ws($tmp2);
384 is(sum_nodes(get_ws_content($tmp2)), 4, '3 leafs & 1 split node in second workspace');
393 $tmp2 = get_unused_workspace();
396 cmd "[con_mark=a] move to workspace $tmp2";
398 is (get_ws($tmp2), undef, 'No empty workspace created');