diff options
| author | Richard M. Stallman | 1998-05-16 03:38:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-16 03:38:59 +0000 |
| commit | 8f6769c4f1d0ff057d009ee62bc1ec00a5294fa7 (patch) | |
| tree | 965dec00af730948f4aecb55ad1020b78aed2c4e /lisp/ange-ftp.el | |
| parent | c11032b95f555e6e45a94621fdc3bf85235032a8 (diff) | |
| download | emacs-8f6769c4f1d0ff057d009ee62bc1ec00a5294fa7.tar.gz emacs-8f6769c4f1d0ff057d009ee62bc1ec00a5294fa7.zip | |
(ange-ftp-tmp-name-template): Use system-tmp-directory.
Diffstat (limited to 'lisp/ange-ftp.el')
| -rw-r--r-- | lisp/ange-ftp.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index bd190091ec3..ecee7db88df 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el | |||
| @@ -700,10 +700,8 @@ These mean that the FTP process should (or already has) been killed." | |||
| 700 | :group 'ange-ftp | 700 | :group 'ange-ftp |
| 701 | :type 'regexp) | 701 | :type 'regexp) |
| 702 | 702 | ||
| 703 | (defcustom ange-ftp-tmp-name-template | 703 | (defcustom ange-ftp-tmp-name-template |
| 704 | (if (memq system-type '(ms-dos windows-nt)) | 704 | (concat system-tmp-directory "/ange-ftp") |
| 705 | (concat (or (getenv "TEMP") (getenv "TMP") "c:/temp") "/ange-ftp") | ||
| 706 | "/tmp/ange-ftp") | ||
| 707 | "*Template used to create temporary files." | 705 | "*Template used to create temporary files." |
| 708 | :group 'ange-ftp | 706 | :group 'ange-ftp |
| 709 | :type 'directory) | 707 | :type 'directory) |