diff options
| author | Juanma Barranquero | 2007-09-26 15:59:13 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 15:59:13 +0000 |
| commit | c4e36c26f634e0f9603b6d65eeebabe97b21378e (patch) | |
| tree | 5eb14f7e4fa97b4bc14171d0654502cf6c6937fe | |
| parent | d9d31f0a440e03d1a924e6835ec27b91afb493e1 (diff) | |
| download | emacs-c4e36c26f634e0f9603b6d65eeebabe97b21378e.tar.gz emacs-c4e36c26f634e0f9603b6d65eeebabe97b21378e.zip | |
(eldoc-function-argstring-format): Deal with the case that special
&keywords are at the beginning or end of the argument list.
Also add some (incomplete) support for non-standard arglists.
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/emacs-lisp/eldoc.el | 3 |
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 83526a50b8f..b09604eb0bb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,12 @@ | |||
| 1 | 2007-09-26 Juanma Barranquero <lekktu@gmail.com> | 1 | 2007-09-26 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 2 | ||
| 3 | * emacs-lisp/eldoc.el (eldoc-function-argstring-format): | ||
| 4 | Deal with the case that special &keywords are at the beginning or | ||
| 5 | end of the argument list. Also add some (incomplete) support for | ||
| 6 | non-standard arglists. | ||
| 7 | |||
| 8 | 2007-09-26 Juanma Barranquero <lekktu@gmail.com> | ||
| 9 | |||
| 3 | * emacs-lisp/eldoc.el (eldoc-message-commands-table-size) | 10 | * emacs-lisp/eldoc.el (eldoc-message-commands-table-size) |
| 4 | (eldoc-message-commands, eldoc-current-idle-delay) | 11 | (eldoc-message-commands, eldoc-current-idle-delay) |
| 5 | (eldoc-function-argstring-format): Fix typos in docstrings. | 12 | (eldoc-function-argstring-format): Fix typos in docstrings. |
diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 10eb821d4e7..7807fc763a4 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el | |||
| @@ -480,7 +480,8 @@ The words \"&rest\", \"&optional\" are returned unchanged." | |||
| 480 | (if (member s '("&optional" "&rest")) | 480 | (if (member s '("&optional" "&rest")) |
| 481 | s | 481 | s |
| 482 | (funcall eldoc-argument-case s))) | 482 | (funcall eldoc-argument-case s))) |
| 483 | (split-string argstring) " ")) | 483 | (split-string argstring "[][ ()]+" t) " ")) |
| 484 | |||
| 484 | 485 | ||
| 485 | ;; When point is in a sexp, the function args are not reprinted in the echo | 486 | ;; When point is in a sexp, the function args are not reprinted in the echo |
| 486 | ;; area after every possible interactive command because some of them print | 487 | ;; area after every possible interactive command because some of them print |