Mercurial > hg > xemacs-beta

diff lisp/setup-paths.el @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents 6240c7796c7a
children aabb7f5b1c81
line wrap: on
line diff
--- a/lisp/setup-paths.el	Mon Aug 13 11:06:08 2007 +0200
+++ b/lisp/setup-paths.el	Mon Aug 13 11:07:10 2007 +0200
@@ -111,10 +111,12 @@
 
 (defun paths-find-lock-directory (roots)
   "Find the lock directory."
+  (defvar configure-lock-directory)
   (paths-find-site-directory roots "lock" "EMACSLOCKDIR" configure-lock-directory))
 
 (defun paths-find-superlock-file (lock-directory)
   "Find the superlock file."
+  ;; #### There is no such variable configure-superlock-file!
   (cond
    ((null lock-directory)
     nil)