[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r110727: * lisp/emacs-lisp/cl.el (let
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r110727: * lisp/emacs-lisp/cl.el (letf): Add missing indent rules. |
Date: |
Mon, 29 Oct 2012 09:50:05 -0400 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 110727
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=12759
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Mon 2012-10-29 09:50:05 -0400
message:
* lisp/emacs-lisp/cl.el (letf): Add missing indent rules.
modified:
lisp/ChangeLog
lisp/emacs-lisp/cl.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2012-10-29 13:28:41 +0000
+++ b/lisp/ChangeLog 2012-10-29 13:50:05 +0000
@@ -1,5 +1,7 @@
2012-10-29 Stefan Monnier <address@hidden>
+ * emacs-lisp/cl.el (letf): Add missing indent rules (bug#12759).
+
* files.el (find-alternate-file): Only ask one question (bug#12487).
2012-10-29 Chong Yidong <address@hidden>
=== modified file 'lisp/emacs-lisp/cl.el'
--- a/lisp/emacs-lisp/cl.el 2012-10-29 01:12:53 +0000
+++ b/lisp/emacs-lisp/cl.el 2012-10-29 13:50:05 +0000
@@ -512,6 +512,7 @@
(defmacro letf (bindings &rest body)
"Dynamically scoped let-style bindings for places.
Like `cl-letf', but with some extra backward compatibility."
+ (declare (indent 1) (debug cl-letf))
;; Like cl-letf, but with special handling of symbol-function.
`(cl-letf ,(mapcar (lambda (x) (if (eq (car-safe (car x)) 'symbol-function)
`((cl--symbol-function ,@(cdar x)) ,@(cdr x))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r110727: * lisp/emacs-lisp/cl.el (letf): Add missing indent rules.,
Stefan Monnier <=