diff options
Diffstat (limited to 'phreeqc.el')
-rw-r--r-- | phreeqc.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/phreeqc.el b/phreeqc.el index 6fdb9c6463df..5f80d3b26a28 100644 --- a/phreeqc.el +++ b/phreeqc.el @@ -453,7 +453,12 @@ with no args, if that value is non-nil." (infile (buffer-name)) (outfile (concat (file-name-sans-extension infile) ".out")) (database phreeqc-database)) - + + ;; make sure that we start with a fresh output buffer to avoid problems + ;; with huge output buffers slowing down emacs + (if (buffer-live-p (get-buffer "*phreeqc*")) + (kill-buffer "*phreeqc*")) + (save-buffer) ;; check if a DATABASE keyword was given (save-excursion |