From dc72699b6c400e530b818250c943587b3ecf663e Mon Sep 17 00:00:00 2001 From: Peter Stephenson Date: Thu, 31 Jul 2008 13:53:28 +0000 Subject: 25364: fix k flag in hash subscript --- Src/params.c | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'Src/params.c') diff --git a/Src/params.c b/Src/params.c index bbacb5476..0bd909905 100644 --- a/Src/params.c +++ b/Src/params.c @@ -1127,7 +1127,11 @@ getarg(char **str, int *inv, Value v, int a2, zlong *w, v->isarr &= ~SCANPM_WANTVALS; } else if (rev) v->isarr |= SCANPM_WANTVALS; - if (!down && !keymatch && ishash) + /* + * This catches the case where we are using "k" (rather + * than "K") on a hash. + */ + if (!down && keymatch && ishash) v->isarr &= ~SCANPM_MATCHMANY; } *inv = ind; -- cgit 1.4.1