csonto/bash-completion
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(testsuite) Fix screen accessing $::BASH_VERSINFO

Browse Source
This commit is contained in:
Freddy Vulto 2010-04-26 19:53:13 +02:00
parent 5b8a8b3391
commit 59e7d21e09
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
test/lib/completions/screen.exp
View File

@ -31,12 +31,12 @@ expect {
# _filedir only works if `-o filenames' is in effect, which isn't the # _filedir only works if `-o filenames' is in effect, which isn't the
# case for `screen' on bash-3, so an expected failure (xfail) # case for `screen' on bash-3, so an expected failure (xfail)
-re "\r\nbar\\s+bar bar.d\\s+foo\\s+foo.d" { -re "\r\nbar\\s+bar bar.d\\s+foo\\s+foo.d" {
if {[lindex $BASH_VERSINFO 0] < 4} {xfail "$test"} {fail "$test"} if {[lindex $::BASH_VERSINFO 0] < 4} {xfail "$test"} {fail "$test"}
} }
-re "\r\nbar\\s+bar\\\\ bar.d/\\s+foo\\s+foo.d/" { -re "\r\nbar\\s+bar\\\\ bar.d/\\s+foo\\s+foo.d/" {
# On bash-3, the space in `bar bar.d' is escaped with a backslash # On bash-3, the space in `bar bar.d' is escaped with a backslash
# as a side-effect of emulating `-o filenames'. # as a side-effect of emulating `-o filenames'.
if {[lindex $BASH_VERSINFO 0] <= 3} {pass "$test"} {fail "$test"} if {[lindex $::BASH_VERSINFO 0] <= 3} {pass "$test"} {fail "$test"}
} }
-re $prompt { unresolved "$test at prompt" } -re $prompt { unresolved "$test at prompt" }
default { unresolved "$test" } default { unresolved "$test" }