mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-14 10:51:20 -07:00
Code Issues Projects Releases Wiki Activity

Include coding.h.

Browse source 
(lock_file): Encode the file name, to make lock file name.
This commit is contained in:
Richard M. Stallman 1998-05-02 06:38:41 +00:00
parent 31406df1a4
commit f4a4528da4
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/filelock.c
View file

@ -41,6 +41,8 @@ Boston, MA 02111-1307, USA. */
#include "lisp.h"
#include "buffer.h"
#include "charset.h"
#include "coding.h"
#include <time.h>
#include <errno.h>
@ -370,15 +372,16 @@ void
lock_file (fn)
Lisp_Object fn;
{
register Lisp_Object attack, orig_fn;
register Lisp_Object attack, orig_fn, encoded_fn;
register char *lfname, *locker;
lock_info_type lock_info;
orig_fn = fn;
fn = Fexpand_file_name (fn, Qnil);
encoded_fn = ENCODE_FILE (fn);
/* Create the name of the lock-file for file fn */
MAKE_LOCK_NAME (lfname, fn);
MAKE_LOCK_NAME (lfname, encoded_fn);
/* See if this file is visited and has changed on disk since it was
visited. */