1 files changed, 27 insertions, 0 deletions
diff --git a/test/lib/completions/perltidy.exp b/test/lib/completions/perltidy.exp
new file mode 100644
index 00000000..09fa2b14
--- /dev/null
+++ b/test/lib/completions/perltidy.exp
@@ -0,0 +1,27 @@
+proc setup {} {
+    save_env
+}
+
+
+proc teardown {} {
+    assert_env_unmodified
+}
+
+
+setup
+
+
+assert_complete_any "perltidy "
+sync_after_int
+
+assert_complete_any "perltidy -h"
+sync_after_int
+
+assert_complete_any "perltidy -ole="
+sync_after_int
+
+assert_no_complete "perltidy -doesntexist="
+sync_after_int
+
+
+teardown