* lisp/emacs-lisp/cl.el (letf): Add missing indent rules.

Fixes: debbugs:12759

2 files changed, 3 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e81a6146a22..387a8b0e619 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-10-29  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+        * 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  <cyd@gnu.org>
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))