diff options
| author | Eli Zaretskii | 1999-09-06 09:05:24 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 1999-09-06 09:05:24 +0000 |
| commit | 751d474c0a03c2606b34edde44d016fd5691a844 (patch) | |
| tree | 6bc60df454036e84ac8c0214c8a26d124a885cc2 | |
| parent | fc1d66a4d7ff63f58d2572a2151bb028db096bc6 (diff) | |
| download | emacs-751d474c0a03c2606b34edde44d016fd5691a844.tar.gz emacs-751d474c0a03c2606b34edde44d016fd5691a844.zip | |
(sh-tmp-file): Use $TMPDIR, if defined, for sh.
| -rw-r--r-- | lisp/progmodes/sh-script.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 1c6994b1fc8..c666e0e2fee 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; sh-script.el --- shell-script editing commands for Emacs | 1 | ;;; sh-script.el --- shell-script editing commands for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1993, 94, 95, 96, 1997 by Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1993, 94, 95, 96, 97, 1999 by Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> | 5 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> |
| 6 | ;; Version: 2.0e | 6 | ;; Version: 2.0e |
| @@ -1344,7 +1344,7 @@ t means to return a list of all possible completions of STRING. | |||
| 1344 | "tmp = /tmp/" str ".$pid" \n | 1344 | "tmp = /tmp/" str ".$pid" \n |
| 1345 | "fn sigexit { rm $tmp^* >[2]/dev/null }") | 1345 | "fn sigexit { rm $tmp^* >[2]/dev/null }") |
| 1346 | (sh (file-name-nondirectory (buffer-file-name)) | 1346 | (sh (file-name-nondirectory (buffer-file-name)) |
| 1347 | "TMP=/tmp/" str ".$$" \n | 1347 | "TMP=${TMPDIR:-/tmp}/" str ".$$" \n |
| 1348 | "trap \"rm $TMP* 2>/dev/null\" " ?0)) | 1348 | "trap \"rm $TMP* 2>/dev/null\" " ?0)) |
| 1349 | 1349 | ||
| 1350 | 1350 | ||