# name => 'Window <n>'
#
sub open_window {
- my ($x, $args) = @_;
+ my ($args) = @_;
my %args = ($args ? %$args : ());
my $dont_map = delete $args{dont_map};
$args{window_type} = $x->atom(name => '_NET_WM_WINDOW_TYPE_UTILITY');
- return open_window($x, \%args);
+ return open_window(\%args);
}
sub open_empty_con {