Ignore classic history when modern session starts

PaulWessel · PaulWessel · commit fcfb659883ae · 2020-08-05T12:45:51.000-10:00
See troubles found in #3844.
diff --git a/src/gmt_init.c b/src/gmt_init.c
@@ -17533,7 +17533,9 @@ int gmt_manage_workflow (struct GMTAPI_CTRL *API, unsigned int mode, char *text)
 					}
 				}
 			}
-			if (error) return (error);			/* Bail at this point */
+			if (error) return (error);		/* Bail at this point */
+			gmt_reset_history (API->GMT);	/* No old classic history shall affect a new modern mode session */
+
 			gmt_conf (API->GMT);				/* Get the original system defaults */
 			if (!clean_start) gmt_getdefaults (API->GMT, NULL);		/* Overload user defaults */
 			snprintf (dir, PATH_MAX, "%s/%s", API->gwf_dir, GMT_SETTINGS_FILE);	/* Reuse dir string for saving gmt.conf to this dir */

Original file line number	Diff line number	Diff line change
`@@ -17533,7 +17533,9 @@ int gmt_manage_workflow (struct GMTAPI_CTRL API, unsigned int mode, char text)`
`17533`	`17533`	`}`
`17534`	`17534`	`}`
`17535`	`17535`	`}`
`17536`		`- if (error) return (error); /* Bail at this point */`
	`17536`	`+ if (error) return (error); /* Bail at this point */`
	`17537`	`+ gmt_reset_history (API->GMT); /* No old classic history shall affect a new modern mode session */`
	`17538`	`+`
`17537`	`17539`	`gmt_conf (API->GMT); /* Get the original system defaults */`
`17538`	`17540`	`if (!clean_start) gmt_getdefaults (API->GMT, NULL); /* Overload user defaults */`
`17539`	`17541`	`snprintf (dir, PATH_MAX, "%s/%s", API->gwf_dir, GMT_SETTINGS_FILE); /* Reuse dir string for saving gmt.conf to this dir */`