diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-06-23 07:28:19 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-06-23 07:28:19 +0000 |
| commit | d916c9650d8f175bdee543955fa49f119ca0daf3 (patch) | |
| tree | 54ee529063d080b7ec820cd790ca59c6b113e987 /lisp/calc/calc-graph.el | |
| parent | b6a44b279c19ca25edabbded3c196e6e914f0b97 (diff) | |
| download | emacs-d916c9650d8f175bdee543955fa49f119ca0daf3.tar.gz | |
(calc-graph-plot): Avoid assignment to free variable `filename'.
Diffstat (limited to 'lisp/calc/calc-graph.el')
| -rw-r--r-- | lisp/calc/calc-graph.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calc/calc-graph.el b/lisp/calc/calc-graph.el index 8bc352bfb1a..5e9470da5f3 100644 --- a/lisp/calc/calc-graph.el +++ b/lisp/calc/calc-graph.el @@ -529,10 +529,10 @@ (calc-clear-command-flag 'clear-message) (message "No data to plot!")) (setq calc-graph-data-cache-limit (max calc-graph-curve-num - calc-graph-data-cache-limit) - filename (calc-temp-file-name 0)) - (write-region (point-min) (point-max) filename nil 'quiet) - (calc-gnuplot-command "load" (prin1-to-string filename)) + calc-graph-data-cache-limit)) + (let ((filename (calc-temp-file-name 0))) + (write-region (point-min) (point-max) filename nil 'quiet) + (calc-gnuplot-command "load" (prin1-to-string filename))) (or (equal output "STDOUT") calc-gnuplot-keep-outfile (progn ; need to close the output file before printing/plotting |