2 # vim:ts=4:sw=4:expandtab
4 # Tests if the 'border toggle' command works correctly
8 my $tmp = fresh_workspace;
12 my @nodes = @{get_ws_content($tmp)};
13 is(@nodes, 1, 'one container on this workspace');
14 is($nodes[0]->{border}, 'normal', 'border style normal');
17 @nodes = @{get_ws_content($tmp)};
18 is($nodes[0]->{border}, '1pixel', 'border style 1pixel');
21 @nodes = @{get_ws_content($tmp)};
22 is($nodes[0]->{border}, 'none', 'border style none');
25 @nodes = @{get_ws_content($tmp)};
26 is($nodes[0]->{border}, 'normal', 'border style back to normal');
29 @nodes = @{get_ws_content($tmp)};
30 is($nodes[0]->{border}, 'none', 'border style none');
33 @nodes = @{get_ws_content($tmp)};
34 is($nodes[0]->{border}, '1pixel', 'border style 1pixel');
37 @nodes = @{get_ws_content($tmp)};
38 is($nodes[0]->{border}, 'normal', 'border style back to normal');