(exec-installed-p): Add parens.

diff --git a/ChangeLog b/ChangeLog
index f9c4438..aa34144 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+1999-10-04  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+       * path-util.el (exec-installed-p): Add parens.
+

 1999-10-04  Keiichi Suzuki  <keiichi@nanap.org>
 
        * path-util.el (exec-installed-p): Use `file-executable-p' instead
 1999-10-04  Keiichi Suzuki  <keiichi@nanap.org>
 
        * path-util.el (exec-installed-p): Use `file-executable-p' instead

diff --git a/path-util.el b/path-util.el
index e6aec37..bfdf7bb 100644 (file)
--- a/path-util.el
+++ b/path-util.el
@@ -142,7 +142,7 @@ If suffixes is omitted, `exec-suffix-list' is used."
   (let (files)
     (catch 'tag
       (while suffixes
   (let (files)
     (catch 'tag
       (while suffixes

-       (let (suf (car suffixes))
+       (let ((suf (car suffixes)))

          (if (and (not (string= suf ""))
                   (string-match (concat (regexp-quote suf) "$") file))
              (progn
          (if (and (not (string= suf ""))
                   (string-match (concat (regexp-quote suf) "$") file))
              (progn