Fixed makefile: was attempting to create MathJax link when it already existed.

This commit is contained in:
Georges Dupéron 2016-01-21 12:23:17 +01:00
parent 95ec94809b
commit e0cbf4752f
2 changed files with 7 additions and 3 deletions

View File

@ -1,5 +1,8 @@
#lang racket
;; TODO: use (or (file-exists? path) (directory-exists? path)
;; (link-exists? path)), when checking whether the output was created.
(require (for-syntax syntax/parse)
rackunit)
@ -41,4 +44,4 @@
(check-equal? (match (build-path "a/b/c/d/e/f" 'up "g/")
((simple-path x y ... z) (simple-path z y ... 'up x)))
(string->path "g/b/c/d/a"))
(string->path "g/b/c/d/a"))

View File

@ -143,8 +143,9 @@
;; Create root MathJax link, must be done before the others
;; Otherwise make/proc thinks the (broken) link hasn't been created.
(make-directory* "docs/") ;; docs/ must be created before Depencency graph too
(make-file-or-directory-link (build-path 'up "lib" "doc" "MathJax")
(build-path "docs" "MathJax"))
(unless (link-exists? (build-path "docs" "MathJax"))
(make-file-or-directory-link (build-path 'up "lib" "doc" "MathJax")
(build-path "docs" "MathJax")))
;; Dependency graph, must be done before docs.