Overview
| Comment: | Nervous chuckle |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
48bece0c477e2511435d749e5b2264e5 |
| User & Date: | joel on 2019-05-08 02:32:02 |
| Other Links: | manifest | tags |
Context
|
2019-05-10
| ||
| 12:40 | Mockup → prototype! check-in: 6034ec3d user: joel tags: trunk | |
|
2019-05-08
| ||
| 02:32 | Nervous chuckle check-in: 48bece0c user: joel tags: trunk | |
|
2019-05-05
| ||
| 14:41 | Fix dumb makefile mistakes check-in: 21d8c833 user: joel tags: trunk | |
Changes
Modified dust.rkt from [c44ac1c4] to [9569787a].
| ︙ | ︙ | |||
116 117 118 119 120 121 122 |
(define series-name (maybe-meta 'series #f))
(when series-name
(define series-file (build-path (current-project-root)
series-folder
(format "~a.poly.pm" series-name)))
(when (file-exists? series-file)
(case (system-type 'os)
| | | 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 |
(define series-name (maybe-meta 'series #f))
(when series-name
(define series-file (build-path (current-project-root)
series-folder
(format "~a.poly.pm" series-name)))
(when (file-exists? series-file)
(case (system-type 'os)
[(windows) (system (format "type nul >> ~a" series-file))]
[else (system (format "touch ~a" series-file))]))))
;; ~~~ Project-wide Pagetrees ~~~
(define (include-in-pagetree folder extension)
(define (matching-file? f)
(string-suffix? f extension))
|
| ︙ | ︙ |