Merge branch 'master' into next

[i3/i3] / testcases / t / 120-multiple-cmds.t

diff --git a/testcases/t/120-multiple-cmds.t b/testcases/t/120-multiple-cmds.t
index 2d0ddcf440fd38bea138e7bf9533399a25c6f5cc..2403fe22d32d12e731a476a5ad6f03a6b2ea8e0d 100644 (file)
--- a/testcases/t/120-multiple-cmds.t
+++ b/testcases/t/120-multiple-cmds.t
@@ -1,6 +1,19 @@
 #!perl
 # vim:ts=4:sw=4:expandtab
 #
+# Please read the following documents before working on tests:
+# • http://build.i3wm.org/docs/testsuite.html
+#   (or docs/testsuite)
+#
+# • http://build.i3wm.org/docs/lib-i3test.html
+#   (alternatively: perldoc ./testcases/lib/i3test.pm)
+#
+# • http://build.i3wm.org/docs/ipc.html
+#   (or docs/ipc)
+#
+# • http://onyxneon.com/books/modern_perl/modern_perl_a4.pdf
+#   (unless you are already familiar with Perl)
+#
 # Tests multiple commands (using ';') and multiple operations (using ',')
 #
 use i3test;
@@ -63,4 +76,12 @@ cmd 'move gibberish' for (0 .. 10);
 
 does_i3_live;
 
+################################################################################
+# regression test: an invalid command should come back with an error.
+################################################################################
+
+my $reply = cmd 'bullshit-command-which-we-never-implement meh';
+is(scalar @$reply, 1, 'got one command reply');
+ok(!$reply->[0]->{success}, 'reply has success == false');
+
 done_testing;