Mercurial > hg > xemacs-beta

comparison src/insdel.c @ 758:760db937b9ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-02-22 17:22:00 by michaels] 2001-09-04 Daiki Ueno <ueno@unixuser.org> * insdel.c (prepare_to_modify_buffer): Don't call the function ask-user-about-supersession-threat when CLASH_DETECTION is set.
author michaels
date Fri, 22 Feb 2002 17:22:02 +0000
parents fdefd0186b75
children 943eaba38521
comparison
equal deleted inserted replaced
757:516c347c4479 758:760db937b9ee
2322 XSETBUFFER (buffer, buf); 2322 XSETBUFFER (buffer, buf);
2323 GCPRO1 (buffer); 2323 GCPRO1 (buffer);
2324 if (!NILP (buf->filename) && lockit && 2324 if (!NILP (buf->filename) && lockit &&
2325 BUF_SAVE_MODIFF (buf) >= BUF_MODIFF (buf)) 2325 BUF_SAVE_MODIFF (buf) >= BUF_MODIFF (buf))
2326 { 2326 {
2327 #ifdef CLASH_DETECTION
2328 if (!NILP (buf->file_truename))
2329 /* Make binding buffer-file-name to nil effective. */
2330 lock_file (buf->file_truename);
2331 #else
2327 /* At least warn if this file has changed on disk since it was visited.*/ 2332 /* At least warn if this file has changed on disk since it was visited.*/
2328 if (NILP (Fverify_visited_file_modtime (buffer)) 2333 if (NILP (Fverify_visited_file_modtime (buffer))
2329 && !NILP (Ffile_exists_p (buf->filename))) 2334 && !NILP (Ffile_exists_p (buf->filename)))
2330 call1_in_buffer (buf, intern ("ask-user-about-supersession-threat"), 2335 call1_in_buffer (buf, intern ("ask-user-about-supersession-threat"),
2331 buf->filename); 2336 buf->filename);
2332 #ifdef CLASH_DETECTION
2333 if (!NILP (buf->file_truename))
2334 /* Make binding buffer-file-name to nil effective. */
2335 lock_file (buf->file_truename);
2336 #endif /* not CLASH_DETECTION */ 2337 #endif /* not CLASH_DETECTION */
2337 } 2338 }
2338 UNGCPRO; 2339 UNGCPRO;
2339 2340
2340 /* #### dmoore - is this reasonable in case of buf being killed above? */ 2341 /* #### dmoore - is this reasonable in case of buf being killed above? */