From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 7 Aug 1997 18:43:19 +0000 (+0000)
Subject: (init_filelock): Function deleted.
X-Git-Tag: emacs-20.1~731
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8b6f8a99981fc349096fe8e8041bbc6621df4745;p=emacs.git

(init_filelock): Function deleted.
---

diff --git a/src/filelock.c b/src/filelock.c
index d36245971e3..c478233d7e1 100644
--- a/src/filelock.c
+++ b/src/filelock.c
@@ -461,31 +461,6 @@ t if it is locked by you, else a string of the name of the locker.")
 
 /* Initialization functions.  */
 
-init_filelock ()
-{
-#if 0
-  char *new_name;
-
-  lock_dir = egetenv ("EMACSLOCKDIR");
-  if (! lock_dir)
-    lock_dir = PATH_LOCK;
-
-  /* Copy the name in case egetenv got it from a Lisp string.  */
-  new_name = (char *) xmalloc (strlen (lock_dir) + 2);
-  strcpy (new_name, lock_dir);
-  lock_dir = new_name;
-
-  /* Make sure it ends with a slash.  */
-  if (lock_dir[strlen (lock_dir) - 1] != '/')
-    strcat (lock_dir, "/");
-
-  superlock_file = (char *) xmalloc ((strlen (lock_dir)
-				      + sizeof (SUPERLOCK_NAME)));
-  strcpy (superlock_file, lock_dir);
-  strcat (superlock_file, SUPERLOCK_NAME);
-#endif
-}
-
 syms_of_filelock ()
 {
   defsubr (&Sunlock_buffer);