(locate-library): Use mapc.
(help-manyarg-func-alist): Add call-process-region.
This commit is contained in:
@@ -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'.
|
||||
|
||||
@@ -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)")
|
||||
|
||||
Reference in New Issue
Block a user