Browse Source

Set lower case for variables or vectors in command 'echo'.

Tokens starting with '$' will get lower-casing.
pre-master-46
Holger Vogt 2 years ago
parent
commit
b62528d7e5
  1. 14
      src/frontend/inpcom.c

14
src/frontend/inpcom.c

@ -1667,7 +1667,19 @@ static struct inp_read_t inp_read(FILE* fp, int call_depth, const char* dir_name
for (s = buffer; *s && (*s != '\n'); s++)
;
}
/* lower case for variables or vectors in command 'echo' */
if (ciprefix("echo", buffer)) {
char* p = buffer;
while (p && *p != '\n' && *p != '\0') {
p = nexttok(p);
/* vectors or variables start with $ */
if (p && *p == '$') {
for (s = p; *s && !isspace_c(*s); s++)
*s = tolower_c(*s);
p = s;
}
}
}
/* add Inp_Path to buffer while keeping the sourcepath variable contents */
if (ciprefix("set", buffer)) {
char *p;

Loading…
Cancel
Save