[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 3c3702b9bbc: * lisp/subr.el (with-output-to-temp-buffer): Add `in
From: |
Stefan Monnier |
Subject: |
master 3c3702b9bbc: * lisp/subr.el (with-output-to-temp-buffer): Add `indent` rule |
Date: |
Fri, 9 Feb 2024 14:14:03 -0500 (EST) |
branch: master
commit 3c3702b9bbc79f63026606dc0f391da3d795226d
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/subr.el (with-output-to-temp-buffer): Add `indent` rule
---
lisp/emacs-lisp/lisp-mode.el | 1 -
lisp/subr.el | 2 +-
2 files changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index ad0525e24be..3475d944337 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -1347,7 +1347,6 @@ Lisp function does not specify a special indentation."
(put 'condition-case 'lisp-indent-function 2)
(put 'handler-case 'lisp-indent-function 1) ;CL
(put 'unwind-protect 'lisp-indent-function 1)
-(put 'with-output-to-temp-buffer 'lisp-indent-function 1)
(put 'closure 'lisp-indent-function 2)
(defun indent-sexp (&optional endpos)
diff --git a/lisp/subr.el b/lisp/subr.el
index f41bb34045e..c317d558e24 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -5019,7 +5019,7 @@ read-only, and scans it for function and variable names
to make them into
clickable cross-references.
See the related form `with-temp-buffer-window'."
- (declare (debug t))
+ (declare (debug t) (indent 1))
(let ((old-dir (make-symbol "old-dir"))
(buf (make-symbol "buf")))
`(let* ((,old-dir default-directory)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 3c3702b9bbc: * lisp/subr.el (with-output-to-temp-buffer): Add `indent` rule,
Stefan Monnier <=