git.sur5r.net Git - i3/i3/blob - testcases/t/174-border-config.t

   1 #!perl
   2 # vim:ts=4:sw=4:expandtab
   3 #
   4 # Tests the new_window and new_float config option.
   5 #
   6
   7 use i3test i3_autostart => 0;
   8
   9 #####################################################################
  10 # 1: check that new windows start with 'normal' border unless configured
  11 # otherwise
  12 #####################################################################
  13
  14 my $config = <<EOT;
  15 # i3 config file (v4)
  16 font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
  17 EOT
  18
  19 my $pid = launch_with_config($config);
  20
  21 my $tmp = fresh_workspace;
  22
  23 ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
  24
  25 my $first = open_window;
  26
  27 my @content = @{get_ws_content($tmp)};
  28 ok(@content == 1, 'one container opened');
  29 is($content[0]->{border}, 'normal', 'border normal by default');
  30
  31 exit_gracefully($pid);
  32
  33 #####################################################################
  34 # 2: check that new tiling windows start with '1pixel' border when
  35 # configured
  36 #####################################################################
  37
  38 $config = <<EOT;
  39 # i3 config file (v4)
  40 font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
  41
  42 new_window 1pixel
  43 EOT
  44
  45 $pid = launch_with_config($config);
  46
  47 $tmp = fresh_workspace;
  48
  49 ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
  50
  51 $first = open_window;
  52
  53 @content = @{get_ws_content($tmp)};
  54 ok(@content == 1, 'one container opened');
  55 is($content[0]->{border}, '1pixel', 'border normal by default');
  56
  57 exit_gracefully($pid);
  58
  59 #####################################################################
  60 # 3: check that new floating windows start with 'normal' border unless
  61 # configured otherwise
  62 #####################################################################
  63
  64 $config = <<EOT;
  65 # i3 config file (v4)
  66 font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
  67 EOT
  68
  69 $pid = launch_with_config($config);
  70
  71 $tmp = fresh_workspace;
  72
  73 ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
  74
  75 $first = open_floating_window;
  76
  77 my $wscontent = get_ws($tmp);
  78 my @floating = @{$wscontent->{floating_nodes}};
  79 ok(@floating == 1, 'one floating container opened');
  80 my $floatingcon = $floating[0];
  81 is($floatingcon->{nodes}->[0]->{border}, 'normal', 'border normal by default');
  82
  83 exit_gracefully($pid);
  84
  85 #####################################################################
  86 # 4: check that new floating windows start with '1pixel' border when
  87 # configured
  88 #####################################################################
  89
  90 $config = <<EOT;
  91 # i3 config file (v4)
  92 font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
  93
  94 new_float 1pixel
  95 EOT
  96
  97 $pid = launch_with_config($config);
  98
  99 $tmp = fresh_workspace;
 100
 101 ok(@{get_ws_content($tmp)} == 0, 'no containers yet');
 102
 103 $first = open_floating_window;
 104
 105 $wscontent = get_ws($tmp);
 106 @floating = @{$wscontent->{floating_nodes}};
 107 ok(@floating == 1, 'one floating container opened');
 108 $floatingcon = $floating[0];
 109 is($floatingcon->{nodes}->[0]->{border}, '1pixel', 'border normal by default');
 110
 111 exit_gracefully($pid);
 112
 113 done_testing;