perl: use get_tree instead of get_workspaces

This commit is contained in:
Michael Stapelberg
2010-11-21 21:42:28 +01:00
parent 0f083f6f78
commit 4549effe15
8 changed files with 10 additions and 10 deletions

View File

@ -9,7 +9,7 @@ my $i3 = i3("/tmp/nestedcons");
$i3->command("blargh!")->recv;
my $tree = $i3->get_workspaces->recv;
my $tree = $i3->get_tree->recv;
my @nodes = @{$tree->{nodes}};
ok(@nodes > 0, 'i3 still lives');