summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVille Skyttä <ville.skytta@iki.fi>2010-01-24 23:36:01 +0200
committerVille Skyttä <ville.skytta@iki.fi>2010-01-24 23:36:01 +0200
commitc0d57b0bea07e11ba70ff3abedade27120c332c8 (patch)
treef73779eaad81750666a6db71a934e2e131d5d180
parent5c6f45d5bb32b789e7e18f2f45cc7fbe04ab1aba (diff)
downloadbash-completion-c0d57b0bea07e11ba70ff3abedade27120c332c8.tar.gz
(testsuite) Use File::Path instead of HTML::Parser to test perldoc.
HTML::Parser is not a "core" Perl module.
-rw-r--r--test/lib/completions/perldoc.exp8
1 files changed, 4 insertions, 4 deletions
diff --git a/test/lib/completions/perldoc.exp b/test/lib/completions/perldoc.exp
index d5221a61..b3ff83b3 100644
--- a/test/lib/completions/perldoc.exp
+++ b/test/lib/completions/perldoc.exp
@@ -18,15 +18,15 @@ sync_after_int
set test "perldoc should complete word containing colons"
-set cmd "perldoc HTML::"
+set cmd "perldoc File::"
send "$cmd\t"
expect {
- # Assuming the module `HTML::Parser' is always installed
- -re "\\sParser\\s" { pass "$test" }
+ # Assuming the module `File::Path' is always installed
+ -re "\\sPath\\s" { pass "$test" }
# Assuming there's no perl module named `fixtures', but only our directory
# `test/fixtures' which is presented falsely.
-re "\\sfixtures/\\s" { fail "$test" }
- -re "perldoc HTML::HTML::" { fail "$test" }
+ -re "perldoc File::File::" { fail "$test" }
-re /@ { unresolved "$test" }
default { unresolved "$test" }
}; # expect