Bugfix: Correct string/quoted string parsing for the commands exec, workspace, nop, restore and mark (Thanks SardemFF7)

Fixes: #380
This commit is contained in:
Michael Stapelberg
2011-05-12 07:09:06 +02:00
parent 2e75d934a4
commit 94646190aa
2 changed files with 24 additions and 3 deletions

View File

@ -30,6 +30,27 @@ multiple_cmds("kill\t ;\tkill");
multiple_cmds("kill\t ;\t kill");
multiple_cmds("kill \t ; \t kill");
#####################################################################
# test if un-quoted strings are handled correctly
#####################################################################
$tmp = fresh_workspace;
cmd 'open';
my $unused = get_unused_workspace;
ok(!($unused ~~ @{get_workspace_names()}), 'workspace does not exist yet');
cmd "move workspace $unused; nop parser test";
ok(($unused ~~ @{get_workspace_names()}), 'workspace exists after moving');
#####################################################################
# quote the workspace name and use a ; (command separator) in its name
#####################################################################
$unused = get_unused_workspace;
$unused .= ';a';
ok(!($unused ~~ @{get_workspace_names()}), 'workspace does not exist yet');
cmd qq|move workspace "$unused"; nop parser test|;
ok(($unused ~~ @{get_workspace_names()}), 'workspace exists after moving');
# TODO: need a non-invasive command before implementing a test which uses ','
done_testing;