From 02684f3ac66c5a87443da799b08b1b3629d29b03 Mon Sep 17 00:00:00 2001 From: sterni Date: Thu, 18 May 2023 00:14:11 +0200 Subject: refactor(3p/lisp/mime4cl): remove be and be* Seems simple enough to use standard LET and a few parentheses more which stock emacs can indent probably. Change-Id: I0137a532186194f62f3a36f9bf05630af1afcdae Reviewed-on: https://cl.tvl.fyi/c/depot/+/8584 Reviewed-by: sterni Autosubmit: sterni Tested-by: BuildkiteCI --- third_party/lisp/mime4cl/test/temp-file.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'third_party/lisp/mime4cl/test/temp-file.lisp') diff --git a/third_party/lisp/mime4cl/test/temp-file.lisp b/third_party/lisp/mime4cl/test/temp-file.lisp index 3e6765806c4e..554f35844b46 100644 --- a/third_party/lisp/mime4cl/test/temp-file.lisp +++ b/third_party/lisp/mime4cl/test/temp-file.lisp @@ -63,7 +63,7 @@ file, otherwise *TMP-FILE-DEFAULTS* is used." "Execute BODY within a dynamic extent where STREAM is bound to a STREAM open on a unique temporary file name. OPEN-TEMP-ARGS are passed verbatim to OPEN-TEMP-FILE." - `(be ,stream (open-temp-file ,@open-temp-args) + `(let ((,stream (open-temp-file ,@open-temp-args))) (unwind-protect (progn ,@body) (close ,stream) -- cgit 1.4.1