HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
35d6372
)
(lock_file): gcpro `fn'.
author
Richard M. Stallman
<rms@gnu.org>
Wed, 29 Apr 1998 00:28:28 +0000
(
00:28
+0000)
committer
Richard M. Stallman
<rms@gnu.org>
Wed, 29 Apr 1998 00:28:28 +0000
(
00:28
+0000)
src/filelock.c
patch
|
blob
|
blame
|
history
diff --git
a/src/filelock.c
b/src/filelock.c
index
7da65d0
..
d8e30ac
100644
(file)
--- a/
src/filelock.c
+++ b/
src/filelock.c
@@
-384,11
+384,17
@@
lock_file (fn)
visited. */
{
register Lisp_Object subject_buf;
+ struct gcpro1;
+
subject_buf = get_truename_buffer (orig_fn);
+ GCPRO1 (fn);
+
if (!NILP (subject_buf)
&& NILP (Fverify_visited_file_modtime (subject_buf))
&& !NILP (Ffile_exists_p (fn)))
call1 (intern ("ask-user-about-supersession-threat"), fn);
+
+ UNGCPRO;
}
/* Try to lock the lock. */