add socket path parameter to i3-wsbar script

fixes http://i3.zekjur.net/bugs/ticket/210
This commit is contained in:
Jan-Erik Rediger 2010-04-11 21:00:57 +02:00 committed by Michael Stapelberg
parent dc702a023a
commit e4632c3a7f
1 changed files with 4 additions and 1 deletions

View File

@ -12,7 +12,7 @@ use AnyEvent;
use v5.10; use v5.10;
my $stdin; my $stdin;
my $i3 = i3; my $socket_path = undef;
my ($workspaces, $outputs) = ([], {}); my ($workspaces, $outputs) = ([], {});
my $last_line = ""; my $last_line = "";
@ -23,6 +23,7 @@ my $show_all = 0;
my $result = GetOptions( my $result = GetOptions(
'command=s' => \$command, 'command=s' => \$command,
'socket=s' => \$socket_path,
'input-on=s' => \$input_on, 'input-on=s' => \$input_on,
'output-on=s' => \$output_on, 'output-on=s' => \$output_on,
'show-all' => \$show_all, 'show-all' => \$show_all,
@ -35,6 +36,8 @@ if ($command eq '') {
exit 1; exit 1;
} }
my $i3 = i3($socket_path);
my @input_on = split(/,/, $input_on); my @input_on = split(/,/, $input_on);
my @output_on = split(/,/, $output_on); my @output_on = split(/,/, $output_on);