changeset 40134:e156a441da6f

(help-manyarg-func-alist): Remove entries for `insert', `insert_and_inherit', `insert_before_markers', `insert-before-markers-and-inherit', `messapge', `message_box', `message_or_box', `propertize', `format', `encode_time', `append', `concat', `vconcat', `nconc', `widget_apply', `make_hash_table', `insert_string', `ml_if', `ml_provide_prefix_argument', `ml_prefix_argument_loop'.

--- a/lisp/help-funs.el	Sun Oct 21 14:20:44 2001 +0000
+++ b/lisp/help-funs.el	Sun Oct 21 14:23:32 2001 +0000
@@ -453,17 +453,7 @@
 ;;   l)
 (defconst help-manyarg-func-alist
   (purecopy
-   '((encode-time
-      . "(encode-time SECOND MINUTE HOUR DAY MONTH YEAR &optional ZONE)")
-     (insert . "(insert &rest ARGS)")
-     (insert-and-inherit . "(insert-and-inherit &rest ARGS)")
-     (insert-before-markers . "(insert-before-markers &rest ARGS)")
-     (message . "(message STRING &rest ARGUMENTS)")
-     (message-box . "(message-box STRING &rest ARGUMENTS)")
-     (message-or-box . "(message-or-box STRING &rest ARGUMENTS)")
-     (propertize . "(propertize STRING &rest PROPERTIES)")
-     (format . "(format STRING &rest OBJECTS)")
-     (apply . "(apply FUNCTION &rest ARGUMENTS)")
+   '((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
@@ -471,13 +461,6 @@
      (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)")
-     (vconcat . "(vconcat &rest SEQUENCES)")
-     (nconc . "(nconc &rest LISTS)")
-     (widget-apply . "(widget-apply WIDGET PROPERTY &rest ARGS)")
-     (make-hash-table . "(make-hash-table &rest KEYWORD-ARGS)")
-     (insert-string . "(insert-string &rest ARGS)")
      (start-process . "(start-process NAME BUFFER PROGRAM &rest PROGRAM-ARGS)")
      (setq-default . "(setq-default SYMBOL VALUE [SYMBOL VALUE...])")
      (save-excursion . "(save-excursion &rest BODY)")
@@ -504,16 +487,11 @@
      (unwind-protect . "(unwind-protect BODYFORM UNWINDFORMS...)")
      (condition-case . "(condition-case VAR BODYFORM HANDLERS...)")
      (track-mouse . "(track-mouse BODY ...)")
-     (ml-if . "(ml-if COND THEN ELSE...)")
-     (ml-provide-prefix-argument . "(ml-provide-prefix-argument ARG1 ARG2)")
-     (ml-prefix-argument-loop . "(ml-prefix-argument-loop ...)")
      (with-output-to-temp-buffer
 	 . "(with-output-to-temp-buffer BUFFNAME BODY ...)")
      (save-window-excursion . "(save-window-excursion BODY ...)")
      (find-operation-coding-system
-      . "(find-operation-coding-system OPERATION ARGUMENTS ...)")
-     (insert-before-markers-and-inherit
-      . "(insert-before-markers-and-inherit &rest ARGS)"))))
+      . "(find-operation-coding-system OPERATION ARGUMENTS ...)"))))
 
 
 (provide 'help-funs)