aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPhilipp Stephani2019-06-11 13:34:14 +0200
committerPhilipp Stephani2019-06-11 13:34:14 +0200
commitc3100573429aeaa65e8e5cf3624fb35a12f2bfba (patch)
tree9c713ee5570095eff7efe64e534e2ab60b4308b1
parent70d5e0ce3896d12e70472a3f33312d4a60b3e607 (diff)
downloademacs-c3100573429aeaa65e8e5cf3624fb35a12f2bfba.tar.gz
emacs-c3100573429aeaa65e8e5cf3624fb35a12f2bfba.zip
Add missing indentation declaration to a few macros.
* lisp/window.el (with-temp-buffer-window) (with-current-buffer-window, with-displayed-buffer-window): Add missing indentation declaration
-rw-r--r--lisp/window.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/window.el b/lisp/window.el
index 0ca628f0065..69b1299dbda 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -181,7 +181,7 @@ This construct is similar to `with-output-to-temp-buffer' but,
181neither runs `temp-buffer-setup-hook' which usually puts the 181neither runs `temp-buffer-setup-hook' which usually puts the
182buffer in Help mode, nor `temp-buffer-show-function' (the ACTION 182buffer in Help mode, nor `temp-buffer-show-function' (the ACTION
183argument replaces this)." 183argument replaces this)."
184 (declare (debug t)) 184 (declare (debug t) (indent 3))
185 (let ((buffer (make-symbol "buffer")) 185 (let ((buffer (make-symbol "buffer"))
186 (window (make-symbol "window")) 186 (window (make-symbol "window"))
187 (value (make-symbol "value"))) 187 (value (make-symbol "value")))
@@ -204,7 +204,7 @@ argument replaces this)."
204This construct is like `with-temp-buffer-window' but unlike that, 204This construct is like `with-temp-buffer-window' but unlike that,
205makes the buffer specified by BUFFER-OR-NAME current for running 205makes the buffer specified by BUFFER-OR-NAME current for running
206BODY." 206BODY."
207 (declare (debug t)) 207 (declare (debug t) (indent 3))
208 (let ((buffer (make-symbol "buffer")) 208 (let ((buffer (make-symbol "buffer"))
209 (window (make-symbol "window")) 209 (window (make-symbol "window"))
210 (value (make-symbol "value"))) 210 (value (make-symbol "value")))
@@ -226,7 +226,7 @@ BODY."
226 "Show a buffer BUFFER-OR-NAME and evaluate BODY in that buffer. 226 "Show a buffer BUFFER-OR-NAME and evaluate BODY in that buffer.
227This construct is like `with-current-buffer-window' but unlike that, 227This construct is like `with-current-buffer-window' but unlike that,
228displays the buffer specified by BUFFER-OR-NAME before running BODY." 228displays the buffer specified by BUFFER-OR-NAME before running BODY."
229 (declare (debug t)) 229 (declare (debug t) (indent 3))
230 (let ((buffer (make-symbol "buffer")) 230 (let ((buffer (make-symbol "buffer"))
231 (window (make-symbol "window")) 231 (window (make-symbol "window"))
232 (value (make-symbol "value"))) 232 (value (make-symbol "value")))