diff options
Diffstat (limited to 'Test')
| -rw-r--r-- | Test/D02glob.ztst | 27 | ||||
| -rw-r--r-- | Test/comptest | 2 |
2 files changed, 28 insertions, 1 deletions
diff --git a/Test/D02glob.ztst b/Test/D02glob.ztst index 81b002120..1f8f65286 100644 --- a/Test/D02glob.ztst +++ b/Test/D02glob.ztst @@ -499,3 +499,30 @@ ) 0:No error with empty null glob with (N). > + + (setopt kshglob + test_array=( + '+fours' '+*' + '@titude' '@*' + '!bang' '!*' + # and check they work in the real kshglob cases too... + '+bus+bus' '+(+bus|-car)' + '@sinhats' '@(@sinhats|wrensinfens)' + '!kerror' '!(!somethingelse)' + # and these don't match, to be sure + '+more' '+(+less)' + '@all@all' '@(@all)' + '!goesitall' '!(!goesitall)' + ) + for str pat in $test_array; do + eval "[[ $str = $pat ]]" && print "$str matches $pat" + done + true + ) +0:kshglob option does not break +, @, ! without following open parenthesis +>+fours matches +* +>@titude matches @* +>!bang matches !* +>+bus+bus matches +(+bus|-car) +>@sinhats matches @(@sinhats|wrensinfens) +>!kerror matches !(!somethingelse) diff --git a/Test/comptest b/Test/comptest index 5577209da..10814d635 100644 --- a/Test/comptest +++ b/Test/comptest @@ -34,8 +34,8 @@ comptestinit () { "fpath=( $fpath )" \ "bindkey -$comptest_keymap" \ 'LISTMAX=10000000 +stty 38400 columns 80 rows 24 TERM=vt100 -stty columns 80 rows 24 setopt zle autoload -U compinit compinit -u |