From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 17 Apr 2000 15:24:06 +0000 (+0000)
Subject: (basic-save-buffer-2): Use a template with `$'
X-Git-Tag: emacs-pretest-21.0.90~4221
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e1603a09df3e184ec7511f6d3b66dc844c7ddc34;p=emacs.git

(basic-save-buffer-2): Use a template with `$'
instead of `#' for VMS.
---

diff --git a/lisp/files.el b/lisp/files.el
index 61db4b6a608..05d71cf851a 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2588,7 +2588,9 @@ After saving the buffer, this function runs `after-save-hook'."
 			      (if (and (eq system-type 'ms-dos)
 				       (not (msdos-long-file-names)))
 				  "%s#%d.tm#" ; MSDOS limits files to 8+3
-				"%s#tmp#%d")
+				(if (memq system-type '(vax-vms axp-vms))
+				    "%s$tmp$%d"
+				  "%s#tmp#%d"))
 			      dir i))
 	      (setq nogood (file-exists-p tempname))
 	      (setq i (1+ i)))