diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-10-29 09:50:05 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-10-29 09:50:05 -0400 |
| commit | c606253cb5849ad04282b2f116e79963abdcea9d (patch) | |
| tree | 4e1ad5b9a973c34a5c2bd3b04f3c8f5a0861ad6b /lisp/emacs-lisp/cl.el | |
| parent | e07fcbdc32093063079b21f5675e6109f143d36d (diff) | |
| download | emacs-c606253cb5849ad04282b2f116e79963abdcea9d.tar.gz | |
* lisp/emacs-lisp/cl.el (letf): Add missing indent rules.
Fixes: debbugs:12759
Diffstat (limited to 'lisp/emacs-lisp/cl.el')
| -rw-r--r-- | lisp/emacs-lisp/cl.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el index a558e505e66..108ad037569 100644 --- a/lisp/emacs-lisp/cl.el +++ b/lisp/emacs-lisp/cl.el @@ -512,6 +512,7 @@ rather than relying on `lexical-binding'." (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)) |