◊(Local Yarn Code "Check-in [41f70967]")

Overview
Comment:Fix bug preventing inclusion of article footers
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 41f7096764b5b4ab6ac6195b961e4fe8c082a49c97d063fb4f4dc2ce0d1208ba
User & Date: joel on 2019-04-11 03:22:30
Other Links: manifest | tags
Context
2019-04-11
03:23
Fix paragraph decoding inside notes check-in: 40ecb212 user: joel tags: trunk
03:22
Fix bug preventing inclusion of article footers check-in: 41f70967 user: joel tags: trunk
2019-04-08
12:37
Notes in listings: shorten titles, fix permlinks, fix styling where no author specified check-in: 5ac5a1e3 user: joel tags: trunk
Changes

Modified crystalize.rkt from [172ca0cc] to [b9c0d03d].

256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
                   pagenode
                   note-count)]
          [(and (note-count . > . 0) (string=? disposition ""))
           (format "There is <a href=\"/~a#furthernotes\">a note</a> appended."
                   pagenode)]
          [else ""]))
  
  (cond [(andmap non-empty-string? (list series-part disp-part notes-part))
         (format "~a ~a ~a" series-part disp-part notes-part)]
        [else ""]))
    

;; ~~~ Notes ~~~

;; Save a collection of ◊note tags to the DB, and return the HTML of the complete







|







256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
                   pagenode
                   note-count)]
          [(and (note-count . > . 0) (string=? disposition ""))
           (format "There is <a href=\"/~a#furthernotes\">a note</a> appended."
                   pagenode)]
          [else ""]))
  
  (cond [(ormap non-empty-string? (list series-part disp-part notes-part))
         (format "~a ~a ~a" series-part disp-part notes-part)]
        [else ""]))
    

;; ~~~ Notes ~~~

;; Save a collection of ◊note tags to the DB, and return the HTML of the complete