summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2014-03-30 16:49:09 +0200
committerBram Moolenaar <Bram@vim.org>2014-03-30 16:49:09 +0200
commita392038db5871af6f78fe4d822d9f7126f25eab6 (patch)
treef5143b9e270cec7da7bee872f59828a1479df80c
parent922a4664fe51662a24097b8e74e5f716beef12f4 (diff)
updated for version 7.4.229v7.4.229
Problem: Using ":let" for listing variables and the second one is a curly braces expression may fail. Solution: Check for an "=" in a better way. (ZyX)
-rw-r--r--src/eval.c15
-rw-r--r--src/testdir/test104.in16
-rw-r--r--src/testdir/test104.ok11
-rw-r--r--src/version.c2
4 files changed, 37 insertions, 7 deletions
diff --git a/src/eval.c b/src/eval.c
index baaa12f015..d9785c4a19 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1856,8 +1856,9 @@ ex_let(eap)
return;
if (argend > arg && argend[-1] == '.') /* for var.='str' */
--argend;
- expr = vim_strchr(argend, '=');
- if (expr == NULL)
+ expr = skipwhite(argend);
+ if (*expr != '=' && !(vim_strchr((char_u *)"+-.", *expr) != NULL
+ && expr[1] == '='))
{
/*
* ":let" without "=": list variables
@@ -1886,12 +1887,14 @@ ex_let(eap)
{
op[0] = '=';
op[1] = NUL;
- if (expr > argend)
+ if (*expr != '=')
{
- if (vim_strchr((char_u *)"+-.", expr[-1]) != NULL)
- op[0] = expr[-1]; /* +=, -= or .= */
+ if (vim_strchr((char_u *)"+-.", *expr) != NULL)
+ op[0] = *expr; /* +=, -= or .= */
+ expr = skipwhite(expr + 2);
}
- expr = skipwhite(expr + 1);
+ else
+ expr = skipwhite(expr + 1);
if (eap->skip)
++emsg_skip;
diff --git a/src/testdir/test104.in b/src/testdir/test104.in
index f329d2dbed..fd847131e9 100644
--- a/src/testdir/test104.in
+++ b/src/testdir/test104.in
@@ -1,4 +1,4 @@
-Tests for autoload. vim: set ft=vim ts=8 :
+Tests for :let. vim: set ft=vim ts=8 :
STARTTEST
:so small.vim
@@ -10,6 +10,20 @@ STARTTEST
:catch
: $put ='FAIL: ' . v:exception
:endtry
+:let a = 1
+:let b = 2
+:for letargs in ['a b', '{0 == 1 ? "a" : "b"}', '{0 == 1 ? "a" : "b"} a', 'a {0 == 1 ? "a" : "b"}']
+: try
+: redir => messages
+: execute 'let' letargs
+: redir END
+: $put ='OK:'
+: $put =split(substitute(messages, '\n', '\0 ', 'g'), '\n')
+: catch
+: $put ='FAIL: ' . v:exception
+: redir END
+: endtry
+:endfor
:/^Results/,$wq! test.out
ENDTEST
diff --git a/src/testdir/test104.ok b/src/testdir/test104.ok
index 5c16509af9..5fb20945c3 100644
--- a/src/testdir/test104.ok
+++ b/src/testdir/test104.ok
@@ -1,2 +1,13 @@
Results of test104:
OK: function('tr')
+OK:
+ a #1
+ b #2
+OK:
+ b #2
+OK:
+ b #2
+ a #1
+OK:
+ a #1
+ b #2
diff --git a/src/version.c b/src/version.c
index 1c78a5e470..2f4c89609d 100644
--- a/src/version.c
+++ b/src/version.c
@@ -735,6 +735,8 @@ static char *(features[]) =
static int included_patches[] =
{ /* Add new patch number below this line */
/**/
+ 229,
+/**/
228,
/**/
227,