Re: auto-save-list-file-name
Steve Youngs <youngs(a)xemacs.org> writes:
In the scratch buffer:
(setq auto-save-list-file-prefix nil)
M-x eval-current-buffer
C-x C-f ~/temp/fred RET
C-x C-s
<bang on the keyboard repeatedly until 'auto-save-interval' expires>
The result:
,----[ ~/nil5896-slackware.mynet.pc ]
| /home/steve/temp/#fred#
| /home/steve/temp/fred
`----
This patch fixes it. Recommended for 21.1.
2000-10-25 Yoshiki Hayashi <yoshiki(a)xemacs.org>
* startup.el (normal-top-level): Set up auto-save-list-file-name
iff auto-save-list-prefix is non-nil.
Index: startup.el
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs/lisp/startup.el,v
retrieving revision 1.24.2.22
diff -u -r1.24.2.22 startup.el
--- startup.el 2000/10/12 07:22:43 1.24.2.22
+++ startup.el 2000/10/25 08:06:52
＠＠ -443,12 +443,13 ＠＠
(setq default-directory (abbreviate-file-name default-directory))
;; Specify the file for recording all the auto save files of
;; this session. This is used by recover-session.
- (setq auto-save-list-file-name
- (expand-file-name
- (format "%s%d-%s"
- auto-save-list-file-prefix
- (emacs-pid)
- (system-name))))
+ (if auto-save-list-file-name
+ (setq auto-save-list-file-name
+ (expand-file-name
+ (format "%s%d-%s"
+ auto-save-list-file-prefix
+ (emacs-pid)
+ (system-name)))))
(run-hooks 'emacs-startup-hook)
(and term-setup-hook
(run-hooks 'term-setup-hook))
--
Yoshiki Hayashi