Browse code
bug(gitignore): create gitignore if missing
Ed Langley authored on 29/10/2020 22:02:59
Showing 1 changed files
Showing 1 changed files
... | ... |
@@ -9,7 +9,7 @@ |
9 | 9 |
(defparameter *args* |
10 | 10 |
(uiop:command-line-arguments)) |
11 | 11 |
|
12 |
-(with-open-file (s ".gitignore" :direction :io :if-exists :append) |
|
12 |
+(with-open-file (s ".gitignore" :direction :io :if-exists :append :if-does-not-exist :create) |
|
13 | 13 |
(fresh-line s) |
14 | 14 |
(if *args* |
15 | 15 |
(format s "~{~a~%~}" *args*) |