no lower case after redirection sign > for command 'asciiplot'

This commit is contained in:
Holger Vogt 2018-11-06 19:19:38 +01:00
parent 7a1218cc0e
commit 639bfc6280
1 changed files with 2 additions and 1 deletions

View File

@ -959,6 +959,7 @@ inp_read(FILE *fp, int call_depth, char *dir_name, bool comfile, bool intfile)
!ciprefix("load", buffer) &&
!ciprefix("plot", buffer) &&
!ciprefix("print", buffer) &&
!ciprefix("asciiplot", buffer) &&
!ciprefix("gnuplot", buffer) &&
!ciprefix("hardcopy", buffer) &&
!(ciprefix("set", buffer) && strstr(buffer, "sourcepath"))
@ -1029,7 +1030,7 @@ inp_read(FILE *fp, int call_depth, char *dir_name, bool comfile, bool intfile)
}
}
}
else if (ciprefix("print", buffer)) {
else if (ciprefix("print", buffer) || ciprefix("asciiplot", buffer)) {
/* lower case excluded for tokens following output redirection '>' */
bool redir = FALSE;
for (s = buffer; *s && (*s != '\n'); s++) {