Mercurial > hg > xemacs-beta

comparison src/buffer.c @ 404:2f8bb876ab1d r21-2-32

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-32
author cvs
date Mon, 13 Aug 2007 11:16:07 +0200
parents a86b2b5e0111
children b8cc9ab3f761
comparison
equal deleted inserted replaced
403:9f011ab08d48 404:2f8bb876ab1d
1025 buf = Fcurrent_buffer (); 1025 buf = Fcurrent_buffer ();
1026 1026
1027 /* The aconses in the Vbuffer_alist are shared with frame->buffer_alist, 1027 /* The aconses in the Vbuffer_alist are shared with frame->buffer_alist,
1028 so this will change it in the per-frame ordering as well. */ 1028 so this will change it in the per-frame ordering as well. */
1029 Fsetcar (Frassq (buf, Vbuffer_alist), newname); 1029 Fsetcar (Frassq (buf, Vbuffer_alist), newname);
1030 /* If the buffer is the selected one then this is equivalent to
1031 recording the buffer. */
1032 if (EQ (Fwindow_buffer (Fselected_window (Qnil)), buf))
1033 {
1034 va_run_hook_with_args (Qrecord_buffer_hook, 1, buf);
1035 }
1036
1030 if (NILP (current_buffer->filename) 1037 if (NILP (current_buffer->filename)
1031 && !NILP (current_buffer->auto_save_file_name)) 1038 && !NILP (current_buffer->auto_save_file_name))
1032 call0 (Qrename_auto_save_file); 1039 call0 (Qrename_auto_save_file);
1033 /* refetch since that last call may have done GC */ 1040 /* refetch since that last call may have done GC */
1034 /* (hypothetical relocating GC) */ 1041 /* (hypothetical relocating GC) */