◊(Local Yarn Code "Check-in [48bece0c]")

Overview
Comment:Nervous chuckle
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 48bece0c477e2511435d749e5b2264e5c6733fa1eaac958a17bed05b809380ee
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
123

124
125
126
127
128
129
130
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))]
        [(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))