From cba740f88d386e6da1d360fd9b25c931b3779bb7 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Thu, 5 May 2016 22:37:55 +0200
Subject: [PATCH] nupa_substitute(), postpone `s' incrementation

---
 src/frontend/numparam/xpressn.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/frontend/numparam/xpressn.c b/src/frontend/numparam/xpressn.c
index 171fdcd64..f531e8235 100644
--- a/src/frontend/numparam/xpressn.c
+++ b/src/frontend/numparam/xpressn.c
@@ -1271,12 +1271,12 @@ nupa_substitute(dico_t *dico, const char *s, char *r)
             } else {
                 /* simple identifier may also be string? */
 
-                const char *kptr = ++s;
+                const char *kptr = s + 1;
                 for (; kptr < s_end; kptr++)
                     if (*kptr <= ' ')
                         break;
 
-                err = evaluate_variable(dico, &qstr, s - 1, kptr);
+                err = evaluate_variable(dico, &qstr, s, kptr);
                 s = kptr;
             }