(locate-library): Use mapc.

(help-manyarg-func-alist): Add call-process-region.
This commit is contained in:
Dave Love
2000-04-27 17:02:42 +00:00
parent 353964e391
commit e3e36d741f
2 changed files with 9 additions and 2 deletions

View File

@@ -1,3 +1,8 @@
2000-04-27 Dave Love <fx@gnu.org>
* help.el (locate-library): Use mapc.
(help-manyarg-func-alist): Add call-process-region.
2000-04-27 Gerd Moellmann <gerd@gnu.org>
* subr.el (add-minor-mode): Use `set' instead of `setq'.

View File

@@ -944,9 +944,9 @@ and the file name is displayed in the echo area."
t))
(let (result)
(catch 'answer
(mapcar
(mapc
(lambda (dir)
(mapcar
(mapc
(lambda (suf)
(let ((try (expand-file-name (concat library suf) dir)))
(and (file-readable-p try)
@@ -1384,6 +1384,8 @@ out of view."
(make-byte-code . "(make-byte-code &rest ELEMENTS)")
(call-process
. "(call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS)")
(call-process-region
. "(call-process-region START END PROGRAM &optional DELETE BUFFER DISPLAY &rest ARGS)")
(string . "(string &rest CHARACTERS)")
(+ . "(+ &rest NUMBERS-OR-MARKERS)")
(- . "(- &optional NUMBER-OR-MARKER &rest MORE-NUMBERS-OR-MARKERS)")