Commit eeed71be authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Fix bug in with-temporary-file, found by Jocelyn Fréchot.

parent e8714648
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -645,7 +645,7 @@ Upon success, the KEEP form is evaluated and the file is is deleted unless it ev
          ,@(when directory `(:directory ,directory))
          ,@(when prefix `(:prefix ,prefix))
          ,@(when suffix `(:suffix ,suffix))
          ,@(when type `(:suffix ,type))
          ,@(when type `(:type ,type))
          ,@(when keep `(:keep ,keep))
          ,@(when after `(:after `#',afterf))
          ,@(when element-type `(:element-type ,element-type))