diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-09 22:39:32 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-09 22:39:32 +0000 |
| commit | 88bbffa9e6e0b99f3b4ef858b58c7c2fdfd23702 (patch) | |
| tree | f5738fb914efe10790e5648bc72c859a60053550 /src/filelock.c | |
| parent | 5356c4e67a68394380be0ca4554c592b06f147f3 (diff) | |
| download | emacs-88bbffa9e6e0b99f3b4ef858b58c7c2fdfd23702.tar.gz | |
(lock_file): Use get_truename_buffer.
Diffstat (limited to 'src/filelock.c')
| -rw-r--r-- | src/filelock.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/filelock.c b/src/filelock.c index 98d197afd54..bda8bede020 100644 --- a/src/filelock.c +++ b/src/filelock.c @@ -199,9 +199,10 @@ void lock_file (fn) register Lisp_Object fn; { - register Lisp_Object attack; + register Lisp_Object attack, orig_fn; register char *lfname; + orig_fn = fn; fn = Fexpand_file_name (fn, Qnil); MAKE_LOCK_NAME (lfname, fn); @@ -210,7 +211,7 @@ lock_file (fn) visited. */ { register Lisp_Object subject_buf; - subject_buf = Fget_file_buffer (fn); + subject_buf = get_truename_buffer (orig_fn); if (!NILP (subject_buf) && NILP (Fverify_visited_file_modtime (subject_buf)) && !NILP (Ffile_exists_p (fn))) |