From: Richard Stallman <rms@gnu.org>
Cc: emacs-devel@gnu.org
Subject: Re: auto-save-visited-file-name
Date: Fri, 17 Oct 2003 16:46:22 -0400 [thread overview]
Message-ID: <E1AAbUM-0000kC-1H@fencepost.gnu.org> (raw)
In-Reply-To: <jwv3cdu1gn3.fsf-monnier+emacs/devel@vor.iro.umontreal.ca> (message from Stefan Monnier on 15 Oct 2003 14:59:33 -0400)
Does this solve the problems you found with auto-save-visited-file-name?
*** buffer.c.~1.438.~ Thu Sep 11 09:51:05 2003
--- buffer.c Fri Oct 17 11:37:36 2003
***************
*** 1429,1435 ****
if (STRINGP (b->auto_save_file_name)
&& b->auto_save_modified != 0
&& BUF_SAVE_MODIFF (b) < b->auto_save_modified
! && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b))
{
Lisp_Object tem;
tem = Fsymbol_value (intern ("delete-auto-save-files"));
--- 1429,1436 ----
if (STRINGP (b->auto_save_file_name)
&& b->auto_save_modified != 0
&& BUF_SAVE_MODIFF (b) < b->auto_save_modified
! && BUF_SAVE_MODIFF (b) < BUF_MODIFF (b)
! && NILP (Fsymbol_value (intern ("auto-save-visited-file-name"))))
{
Lisp_Object tem;
tem = Fsymbol_value (intern ("delete-auto-save-files"));
*** fileio.c.~1.494.~ Thu Sep 11 09:51:19 2003
--- fileio.c Fri Oct 17 11:35:48 2003
***************
*** 4684,4690 ****
{
Lisp_Object val;
! if (auto_saving)
{
/* We use emacs-mule for auto saving... */
setup_coding_system (Qemacs_mule, coding);
--- 4684,4691 ----
{
Lisp_Object val;
! if (auto_saving
! && ! NILP (Fsymbol_value (intern ("auto-save-visited-file-name"))))
{
/* We use emacs-mule for auto saving... */
setup_coding_system (Qemacs_mule, coding);
***************
*** 5212,5218 ****
error ("IO error writing %s: %s", SDATA (filename),
emacs_strerror (save_errno));
! if (visiting)
{
SAVE_MODIFF = MODIFF;
XSETFASTINT (current_buffer->save_length, Z - BEG);
--- 5213,5222 ----
error ("IO error writing %s: %s", SDATA (filename),
emacs_strerror (save_errno));
! if (visiting
! || (auto_saving
! && ! NILP (Fsymbol_value (intern ("auto-save-visited-file-name")))))
!
{
SAVE_MODIFF = MODIFF;
XSETFASTINT (current_buffer->save_length, Z - BEG);
***************
*** 5775,5785 ****
minibuffer_auto_raise = 0;
auto_saving = 1;
! /* First, save all files which don't have handlers. If Emacs is
! crashing, the handlers may tweak what is causing Emacs to crash
! in the first place, and it would be a shame if Emacs failed to
! autosave perfectly ordinary files because it couldn't handle some
! ange-ftp'd file. */
for (do_handled_files = 0; do_handled_files < 2; do_handled_files++)
for (tail = Vbuffer_alist; GC_CONSP (tail); tail = XCDR (tail))
{
--- 5779,5792 ----
minibuffer_auto_raise = 0;
auto_saving = 1;
! /* On first pass, save all files that don't have handlers.
! On second pass, save all files that do have handlers.
!
! If Emacs is crashing, the handlers may tweak what is causing
! Emacs to crash in the first place, and it would be a shame if
! Emacs failed to autosave perfectly ordinary files because it
! couldn't handle some ange-ftp'd file. */
!
for (do_handled_files = 0; do_handled_files < 2; do_handled_files++)
for (tail = Vbuffer_alist; GC_CONSP (tail); tail = XCDR (tail))
{
next prev parent reply other threads:[~2003-10-17 20:46 UTC|newest]
Thread overview: 9+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-10-15 18:59 auto-save-visited-file-name Stefan Monnier
2003-10-15 21:20 ` auto-save-visited-file-name Kim F. Storm
2003-10-16 17:10 ` auto-save-visited-file-name Stefan Monnier
2003-10-16 19:52 ` auto-save-visited-file-name Kim F. Storm
2003-10-16 7:19 ` auto-save-visited-file-name Eli Zaretskii
2003-10-17 20:46 ` Richard Stallman [this message]
2003-10-17 21:14 ` auto-save-visited-file-name Stefan Monnier
2003-10-23 15:55 ` auto-save-visited-file-name Kevin Rodgers
2003-10-24 5:16 ` auto-save-visited-file-name Richard Stallman
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=E1AAbUM-0000kC-1H@fencepost.gnu.org \
--to=rms@gnu.org \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.