procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(help-manyarg-func-alist): Add ml-prefix-argument-loop,

Browse source 
insert-before-markers-and-inherit.  Now checked systematically!
This commit is contained in:
Dave Love 2000-09-05 15:16:23 +00:00
parent 66ffe51c35
commit 3b4429b490
2 changed files with 19 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2000-09-05 Dave Love <fx@gnu.org>
* help.el (help-manyarg-func-alist): Add ml-prefix-argument-loop,
insert-before-markers-and-inherit. Now checked systematically!
2000-09-05 Alex Schroeder <alex@gnu.org>
* sql.el (sql-postgres): Use sql-postgres-options.

15
lisp/help.el
View file

@ -1476,6 +1476,16 @@ out of view."
;; to this alist.
;; The parens and function name are redundant, but it's messy to add
;; them in `documentation'.
;; This will find any missing items:
;; (let (l)
;; (mapatoms (lambda (x)
;; (if (and (fboundp x)
;; (subrp (symbol-function x))
;; (not (numberp (cdr (subr-arity (symbol-function x)))))
;; (not (assq x help-manyarg-func-alist)))
;; (push x l))))
;; l)
(defconst help-manyarg-func-alist
(purecopy
'((list . "(list &rest OBJECTS)")
@ -1548,10 +1558,13 @@ out of view."
(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 ...)"))))
. "(find-operation-coding-system OPERATION ARGUMENTS ...)")
(insert-before-markers-and-inherit
. "(insert-before-markers-and-inherit &rest ARGS)"))))
;;; help.el ends here