git.fiddlerwoaroof.com
Browse code

bug(gitignore): create gitignore if missing

Ed Langley authored on 29/10/2020 22:02:59
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*)