diff options
| author | Chong Yidong | 2009-05-10 22:01:20 +0000 |
|---|---|---|
| committer | Chong Yidong | 2009-05-10 22:01:20 +0000 |
| commit | 143770f236fe75247343d0d5c063dc09d1cf10df (patch) | |
| tree | 24799d5e81b712e938345243c26a75cd8d8c1978 | |
| parent | 27a69fd9b39feb90bb20c18867b0e57ecf785c8c (diff) | |
| download | emacs-143770f236fe75247343d0d5c063dc09d1cf10df.tar.gz emacs-143770f236fe75247343d0d5c063dc09d1cf10df.zip | |
* emacs-lisp/cl-macs.el (lexical-let*): Doc fix (Bug#3178).
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 6 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ae877524983..073d45db526 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2009-05-10 Chong Yidong <cyd@stupidchicken.com> | ||
| 2 | |||
| 3 | * emacs-lisp/cl-macs.el (lexical-let*): Doc fix (Bug#3178). | ||
| 4 | |||
| 1 | 2009-05-10 Kim F. Storm <storm@cua.dk> | 5 | 2009-05-10 Kim F. Storm <storm@cua.dk> |
| 2 | 6 | ||
| 3 | * ido.el: Add proper support for confirm-nonexistent-file-or-buffer | 7 | * ido.el: Add proper support for confirm-nonexistent-file-or-buffer |
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index edcb5c90564..2d6eb93550b 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el | |||
| @@ -1448,8 +1448,10 @@ lexical closures as in Common Lisp. | |||
| 1448 | ;;;###autoload | 1448 | ;;;###autoload |
| 1449 | (defmacro lexical-let* (bindings &rest body) | 1449 | (defmacro lexical-let* (bindings &rest body) |
| 1450 | "Like `let*', but lexically scoped. | 1450 | "Like `let*', but lexically scoped. |
| 1451 | The main visible difference is that lambdas inside BODY will create | 1451 | The main visible difference is that lambdas inside BODY, and in |
| 1452 | lexical closures as in Common Lisp. | 1452 | successive bindings within BINDINGS, will create lexical closures |
| 1453 | as in Common Lisp. This is similar to the behavior of `let*' in | ||
| 1454 | Common Lisp. | ||
| 1453 | \n(fn VARLIST BODY)" | 1455 | \n(fn VARLIST BODY)" |
| 1454 | (if (null bindings) (cons 'progn body) | 1456 | (if (null bindings) (cons 'progn body) |
| 1455 | (setq bindings (reverse bindings)) | 1457 | (setq bindings (reverse bindings)) |