From 2f56feea4a91ef0ef88a8dc0628c088d0e418f40 Mon Sep 17 00:00:00 2001 From: Holger Vogt Date: Sun, 27 May 2018 07:56:40 +0200 Subject: [PATCH] do not lower-case command 'set sourcepath = XXX' --- src/frontend/inpcom.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/frontend/inpcom.c b/src/frontend/inpcom.c index a7fadad13..2a3c573f6 100644 --- a/src/frontend/inpcom.c +++ b/src/frontend/inpcom.c @@ -917,7 +917,8 @@ inp_read(FILE *fp, int call_depth, char *dir_name, bool comfile, bool intfile) !ciprefix("source", buffer) && !ciprefix("load", buffer) && !ciprefix("plot", buffer) && - !ciprefix("hardcopy", buffer) + !ciprefix("hardcopy", buffer) && + !(ciprefix("set", buffer) && strstr(buffer, "sourcepath")) ) { /* lower case for all other lines */