From c4eaba636f56ee52029fe6530ea4065ede489380 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ville=20Skytt=C3=A4?= <ville.skytta@iki.fi>
Date: Tue, 16 Nov 2010 23:20:46 +0200
Subject: [PATCH] (testsuite) Add some perl module completion test cases
 (Alioth: #312832).

The -MFile::Sp and -MFile::Spec::Func test cases fail at the moment
but are not marked as expected failures, hoping for a quick fix for
the above bug ;)
---
 test/lib/completions/perl.exp | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/test/lib/completions/perl.exp b/test/lib/completions/perl.exp
index 8be41621..906433d1 100644
--- a/test/lib/completions/perl.exp
+++ b/test/lib/completions/perl.exp
@@ -91,5 +91,15 @@ assert_complete $options "perl -"
 
 sync_after_int
 
+# Assuming that File::Spec and friends are always installed...
+
+assert_complete_any "perl -MFile"
+sync_after_int
+
+assert_complete_any "perl -MFile::Sp"
+sync_after_int
+
+assert_complete_any "perl -MFile::Spec::Func"
+sync_after_int
 
 teardown