diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/executable.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f4cdf9028bd..8885aff60e3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2004-02-01 Andreas Schwab <schwab@suse.de> | ||
| 2 | |||
| 3 | * progmodes/executable.el (executable-command-find-posix-p): Doc | ||
| 4 | fix. | ||
| 5 | |||
| 1 | 2004-02-01 Stephen Eglen <stephen@gnu.org> | 6 | 2004-02-01 Stephen Eglen <stephen@gnu.org> |
| 2 | 7 | ||
| 3 | * info-look.el: Add support for maxima-mode. Update commentary | 8 | * info-look.el: Add support for maxima-mode. Update commentary |
diff --git a/lisp/progmodes/executable.el b/lisp/progmodes/executable.el index 4d12031588d..b301d84d144 100644 --- a/lisp/progmodes/executable.el +++ b/lisp/progmodes/executable.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; executable.el --- base functionality for executable interpreter scripts -*- byte-compile-dynamic: t -*- | 1 | ;;; executable.el --- base functionality for executable interpreter scripts -*- byte-compile-dynamic: t -*- |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1994, 1995, 1996, 2000, 2003 by Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1994, 1995, 1996, 2000, 2003, 2004 by Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> | 5 | ;; Author: Daniel Pfeiffer <occitan@esperanto.org> |
| 6 | ;; Keywords: languages, unix | 6 | ;; Keywords: languages, unix |
| @@ -143,7 +143,7 @@ See `compilation-error-regexp-alist'.") | |||
| 143 | ;;;###autoload | 143 | ;;;###autoload |
| 144 | (defun executable-command-find-posix-p (&optional program) | 144 | (defun executable-command-find-posix-p (&optional program) |
| 145 | "Check if PROGRAM handles arguments Posix-style. | 145 | "Check if PROGRAM handles arguments Posix-style. |
| 146 | If PROGRAM is non-nil, use that instead of "find"." | 146 | If PROGRAM is non-nil, use that instead of \"find\"." |
| 147 | ;; Pick file to search from location we know | 147 | ;; Pick file to search from location we know |
| 148 | (let* ((dir (car load-path)) | 148 | (let* ((dir (car load-path)) |
| 149 | (file (find-if | 149 | (file (find-if |