Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
3b4429b4
Commit
3b4429b4
authored
Sep 05, 2000
by
Dave Love
Browse files
(help-manyarg-func-alist): Add ml-prefix-argument-loop,
insert-before-markers-and-inherit. Now checked systematically!
parent
66ffe51c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
19 additions
and
1 deletion
+19
-1
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/help.el
lisp/help.el
+14
-1
No files found.
lisp/ChangeLog
View file @
3b4429b4
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.
...
...
lisp/help.el
View file @
3b4429b4
...
...
@@ -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
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment