From c606253cb5849ad04282b2f116e79963abdcea9d Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 29 Oct 2012 09:50:05 -0400 Subject: [PATCH] * lisp/emacs-lisp/cl.el (letf): Add missing indent rules. Fixes: debbugs:12759 --- lisp/ChangeLog | 2 ++ lisp/emacs-lisp/cl.el | 1 + 2 files changed, 3 insertions(+) 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 + * 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 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)) -- 2.39.2