diff --git a/src/frontend/inpcom.c b/src/frontend/inpcom.c index b5479cbc0..347e31da4 100644 --- a/src/frontend/inpcom.c +++ b/src/frontend/inpcom.c @@ -1134,8 +1134,8 @@ struct inp_read_t inp_read( FILE *fp, int call_depth, const char *dir_name, ; } - /* add Inp_Path to sourcepath variable */ - if (cieq(buffer, "set") || cieq(buffer, "setcs")) { + /* add Inp_Path to buffer while keeping the sourcepath variable contents */ + if (ciprefix("set", buffer)) { char *p = strstr(buffer, "sourcepath"); if (p) { p = strchr(buffer, ')'); @@ -1149,6 +1149,9 @@ struct inp_read_t inp_read( FILE *fp, int call_depth, const char *dir_name, for (s = buffer; *s && (*s != '\n'); s++) ; } + else { + fprintf(stderr, "Warning: no closing parens found in 'set sourcepath' statement\n"); + } } }