comparison src/filelock.c @ 12104:10197e4b3fb2

(unlock_file, lock_file): Call Fexpand_file_name.
author Karl Heuer <kwzh@gnu.org>
date Wed, 07 Jun 1995 20:39:56 +0000
parents e4fb5e01090a
children 11f5ce737c57
comparison
equal deleted inserted replaced
12103:5a4f4ce4ebb6 12104:10197e4b3fb2
200 register Lisp_Object fn; 200 register Lisp_Object fn;
201 { 201 {
202 register Lisp_Object attack; 202 register Lisp_Object attack;
203 register char *lfname; 203 register char *lfname;
204 204
205 fn = Fexpand_file_name (fn, Qnil);
206
205 MAKE_LOCK_NAME (lfname, fn); 207 MAKE_LOCK_NAME (lfname, fn);
206 208
207 /* See if this file is visited and has changed on disk since it was 209 /* See if this file is visited and has changed on disk since it was
208 visited. */ 210 visited. */
209 { 211 {
327 unlock_file (fn) 329 unlock_file (fn)
328 register Lisp_Object fn; 330 register Lisp_Object fn;
329 { 331 {
330 register char *lfname; 332 register char *lfname;
331 333
334 fn = Fexpand_file_name (fn, Qnil);
335
332 MAKE_LOCK_NAME (lfname, fn); 336 MAKE_LOCK_NAME (lfname, fn);
333 337
334 lock_superlock (lfname); 338 lock_superlock (lfname);
335 339
336 if (current_lock_owner_1 (lfname) == getpid ()) 340 if (current_lock_owner_1 (lfname) == getpid ())