suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

raco setup: more on docindex database creation

Browse Source 
Commit 6ff7359212 didn't create a directory that might be missing
before trying to create a file in the directory.

Merge bug fix to v6.0 (pending review)
(cherry picked from commit 4fc71002e8)
This commit is contained in:
Matthew Flatt 2013-12-17 06:09:59 -07:00 committed by Ryan Culpepper
parent 9b9d35b290
commit f3f23e4c3f
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/racket-pkgs/racket-index/setup/scribble.rkt
View File

@ -230,8 +230,11 @@
;; Ensure that databases are created: ;; Ensure that databases are created:
(define (touch-db db-file) (define (touch-db db-file)
(doc-db-disconnect (unless (file-exists? db-file)
(doc-db-file->connection db-file #t))) (define-values (base name dir?) (split-path db-file))
(make-directory* base)
(doc-db-disconnect
(doc-db-file->connection db-file #t))))
(when (ormap can-build*? main-docs) (when (ormap can-build*? main-docs)
(touch-db main-db)) (touch-db main-db))
(when (ormap can-build*? user-docs) (when (ormap can-build*? user-docs)