From 29a9ebd0a5f9bf1e0e88f09dd97103b8eac4bba0 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Sun, 21 Oct 2001 14:23:32 +0000 Subject: [PATCH] (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'. --- lisp/help-funs.el | 26 ++------------------------ 1 file changed, 2 insertions(+), 24 deletions(-) diff --git a/lisp/help-funs.el b/lisp/help-funs.el index e76c1a8deb0..da068a947cd 100644 --- a/lisp/help-funs.el +++ b/lisp/help-funs.el @@ -453,17 +453,7 @@ it is displayed along with the global value." ;; 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 @@ it is displayed along with the global value." (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 @@ it is displayed along with the global value." (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) -- 2.39.2