Mercurial > emacs
changeset 43606:54abc38794d9
(calc-gnuplot-tempfile): Don't expand against
`temporary-file-directory'; we now do that in `calc-graph-file-cache'.
(calc-temp-file-name): Use `make-temp-file'.
| author | Colin Walters <walters@gnu.org> |
|---|---|
| date | Fri, 01 Mar 2002 01:18:37 +0000 |
| parents | f080cd54affc |
| children | 646014f22c72 |
| files | lisp/calc/calc-graph.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-graph.el Fri Mar 01 01:14:22 2002 +0000 +++ b/lisp/calc/calc-graph.el Fri Mar 01 01:18:37 2002 +0000 @@ -37,7 +37,7 @@ ;;; Graphics ;;; Note that some of the following initial values also occur in calc.el. -(defvar calc-gnuplot-tempfile (expand-file-name "calc" temporary-file-directory)) +(defvar calc-gnuplot-tempfile "calc") (defvar calc-gnuplot-default-device "default") (defvar calc-gnuplot-default-output "STDOUT") @@ -845,7 +845,7 @@ (setq calc-graph-file-cache (nconc calc-graph-file-cache (list nil)))) (car (or (nth (1+ num) calc-graph-file-cache) (setcar (nthcdr (1+ num) calc-graph-file-cache) - (list (make-temp-name + (list (make-temp-file (concat calc-gnuplot-tempfile (if (<= num 0) (char-to-string (- ?A num))