diff options
| author | Lars Magne Ingebrigtsen | 2011-07-15 18:01:18 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2011-07-15 18:01:18 +0200 |
| commit | dbc44fcd08d1105e2aa4de567d40814f6b668053 (patch) | |
| tree | 5bdd6a32057903e8b9ee7793ffb0e4edfd4be46d | |
| parent | 89671e16b34f41fd4b56cf01f329bbed26c483f8 (diff) | |
| download | emacs-dbc44fcd08d1105e2aa4de567d40814f6b668053.tar.gz emacs-dbc44fcd08d1105e2aa4de567d40814f6b668053.zip | |
* emacs-lisp/cl-macs.el (declare): Link to the "Declarations" node.
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 36d6cebc878..e15843f136d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2011-07-15 Lars Magne Ingebrigtsen <larsi@gnus.org> | 1 | 2011-07-15 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 2 | ||
| 3 | * emacs-lisp/cl-macs.el (declare): Link to the "Declarations" node. | ||
| 4 | |||
| 3 | * info.el (Info-beginning-of-buffer): New command. | 5 | * info.el (Info-beginning-of-buffer): New command. |
| 4 | (Info-mode-map): Use it instead of `beginning-of-buffer' to allow | 6 | (Info-mode-map): Use it instead of `beginning-of-buffer' to allow |
| 5 | announcing `b' as the key (bug#8325). | 7 | announcing `b' as the key (bug#8325). |
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 4f9e0e8b70a..5b6d08472f1 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el | |||
| @@ -1606,7 +1606,8 @@ For instance | |||
| 1606 | 1606 | ||
| 1607 | \(declare (warn 0)) | 1607 | \(declare (warn 0)) |
| 1608 | 1608 | ||
| 1609 | will turn off byte-compile warnings in the function." | 1609 | will turn off byte-compile warnings in the function. |
| 1610 | See Info node `(cl)Declarations' for details." | ||
| 1610 | (if (cl-compiling-file) | 1611 | (if (cl-compiling-file) |
| 1611 | (while specs | 1612 | (while specs |
| 1612 | (if (listp cl-declare-stack) (push (car specs) cl-declare-stack)) | 1613 | (if (listp cl-declare-stack) (push (car specs) cl-declare-stack)) |