summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog2
-rw-r--r--Test/Y02compmatch.ztst8
2 files changed, 10 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 644e177c2..3a9e31178 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2007-11-28  Peter Stephenson  <p.w.stephenson@ntlworld.com>
 
+	* 24128: Test/Y02compmatch.ztst: test for 24127.
+
 	* 24127: Src/Zle/compcore.c, Src/Zle/compmatch.c: fix
 	bug with matcher 'r:|[-./_]=* r:|=* l:|=*' completing
 	where word on command line starts after a "-".
diff --git a/Test/Y02compmatch.ztst b/Test/Y02compmatch.ztst
index abbe51bce..704580043 100644
--- a/Test/Y02compmatch.ztst
+++ b/Test/Y02compmatch.ztst
@@ -667,6 +667,14 @@
 >NO:{aA.bC.cB.dA}
 >NO:{aD.bC.cB.dA}
 
+ users_12227_matcher='r:|[-./_]=* r:|=* l:|=*'
+ users_12227_list=(foo-bar-abc foo-bar-def foo-bar-ghi)
+ test_code $users_12227_matcher users_12227_list
+ comptest $'tst bar\t'
+0:Test for wildcard left anchor with partial word right anchors
+>line: {tst foo-bar-}{}
+>COMPADD:{}
+>INSERT_POSITIONS:{12}
 
 %clean