From: Tony Crisci <tony@dubstepdish.com>
Date: Thu, 17 Oct 2013 11:20:35 +0000 (-0400)
Subject: Testcases: new-test prints usage without input
X-Git-Tag: 4.7~34
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=9adff26dcfbc14a0cfdaa0756d704c2e9f6f5b11;p=i3%2Fi3

Testcases: new-test prints usage without input

Prevent the accidental creation of new tests with empty names by
printing usage information for new-test when the test name would be
empty.
---

diff --git a/testcases/new-test b/testcases/new-test
index c2546158..14465d2d 100755
--- a/testcases/new-test
+++ b/testcases/new-test
@@ -15,6 +15,16 @@ use File::Basename qw(basename);
 use Getopt::Long;
 use v5.10;
 
+my $usage = <<'EOF';
+Script to create a new testcase from a template.
+
+    # Create (and edit) a new test for moving floating windows
+    ./new-test floating move
+
+    # Create (and edit) a multi-monitor test for moving workspaces
+    ./new-test -m move workspaces
+EOF
+
 my $multi_monitor;
 
 my $result = GetOptions(
@@ -24,6 +34,11 @@ my $result = GetOptions(
 my $testname = join(' ', @ARGV);
 $testname =~ s/ /-/g;
 
+unless (length $testname) {
+    say $usage;
+    exit(0);
+}
+
 my $header = <<'EOF';
 #!perl
 # vim:ts=4:sw=4:expandtab