(help-manyarg-func-alist): Correct several omissions.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dfaf45023b779e7aaaed2e06c068909bb536711e..1c76db799633a1b1f32d2282817446da65868c68 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2000-03-31  Dave Love  <fx@gnu.org>
 
+       * help.el (help-manyarg-func-alist): Correct several omissions.
+
        * add-log.el: Don't require cl, fortran.
        (add-log-current-defun-function): Doc fix.
        (change-log-version-number-regexp-list): Remove SCCS part.  Doc

diff --git a/lisp/help.el b/lisp/help.el
index d0ca865a9dedca2f55169ff493071ec840d472e0..b36075b81142f95e3114ff04218de93ac7b23e7e 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -1375,6 +1375,11 @@ out of view."
      (format . "(format STRING &rest OBJECTS)")
      (apply . "(apply FUNCTION &rest ARGUMENTS)")
      (run-hooks . "(run-hooks &rest HOOKS)")
+     (run-hook-with-args . "(run-hook-with-args HOOK &rest ARGS)")
+     (run-hook-with-args-until-failure
+      . "(run-hook-with-args-until-failure HOOK &rest ARGS)")
+     (run-hook-with-args-until-success
+      . "(run-hook-with-args-until-success HOOK &rest ARGS)")
      (funcall . "(funcall FUNCTION &rest ARGUMENTS)")
      (append . "(append &rest SEQUENCES)")
      (concat . "(concat &rest SEQUENCES)")
@@ -1409,6 +1414,10 @@ out of view."
      (unwind-protect . "(unwind-protect BODYFORM UNWINDFORMS...)")
      (condition-case . "(condition-case VAR BODYFORM HANDLERS...)")
      (track-mouse . "(track-mouse BOFY ...)")
-     (ml-if . "(ml-if COND THEN ELSE...)"))))
+     (ml-if . "(ml-if COND THEN ELSE...)")
+     (ml-provide-prefix-argument . "(ml-provide-prefix-argument ARG1 ARG2)")
+     (with-output-to-temp-buffer
+        . "(with-output-to-temp-buffer BUFFNAME BODY ...)")
+     (save-window-excursion . "(save-window-excursion BODY ...)"))))
 
 ;;; help.el ends here