Permalink
Browse files

:supersede instead of :overwrite :-/

  • Loading branch information...
1 parent 1fa7fe5 commit 5e644553d42d5a1413d9576ac3cb0c0e1f9fa33e @mishoo committed Jan 22, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 build/main.lisp
View
@@ -45,7 +45,7 @@
(if (or overwrite output-file)
(with-open-file (out (if overwrite input-file output-file)
:direction :output
- :if-exists :overwrite
+ :if-exists :supersede
:if-does-not-exist :create)
(write-string result out))
(write-string result *standard-output*)))))))

0 comments on commit 5e64455

Please sign in to comment.