X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/d977f44b3dbc17d099431c53d053005262769c6b..4da88bb98b75edf5033fa864cae0d3d1c397ac07:/optparse.lisp

diff --git a/optparse.lisp b/optparse.lisp
index 09050f6..73d9619 100644
--- a/optparse.lisp
+++ b/optparse.lisp
@@ -426,8 +426,8 @@ (defmacro with-unix-error-reporting ((&key) &body body)
 	 (progn ,@body)
        (simple-condition (,cond)
 	 (apply #'die
-	        (simple-condition-format-control ,cond)
-	        (simple-condition-format-arguments ,cond)))
+		(simple-condition-format-control ,cond)
+		(simple-condition-format-arguments ,cond)))
        (error (,cond)
 	 (die "~A" ,cond)))))