Overview
Comment: | Additional CSS styles for block-quotes. Omit article footer tag when no footer text is present. |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA3-256: |
3911576ed099a7441e26bf0ee04113e8 |
User & Date: | joel on 2018-09-26 01:00:56 |
Original Comment: | Additional CSS styles for block-quotes |
Other Links: | manifest | tags |
Context
2018-09-26
| ||
02:57 | Make note author bylines italic check-in: 6069a320 user: joel tags: trunk | |
01:00 | Additional CSS styles for block-quotes. Omit article footer tag when no footer text is present. check-in: 3911576e user: joel tags: trunk | |
2018-09-23
| ||
21:57 | Correct and clarify display of articles that do not specify a title. check-in: 5b2f378a user: joel tags: trunk | |
Changes
Modified crystalize.rkt from [04b300fe] to [c317bddb].
︙ | ︙ | |||
205 206 207 208 209 210 211 | pagenode note-count)] [(and (note-count . > . 0) (string=? disposition "")) (format "There is <a href=\"/~a#furthernotes\">a note</a> appended." pagenode)] [else ""])) | > | > | 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 | 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 ;; “Further Notes” section at the end ;; |
︙ | ︙ |
Modified template-html.rkt from [add48486] to [18aa6a0e].
︙ | ︙ | |||
69 70 71 72 73 74 75 | ◊string-append{<article class="no-title hentry"> <h1><a href="#" class="rel-bookmark"> <time datetime="◊published" class="entry-title">◊ymd->english[published]</time> </a></h1> <section class="entry-content">}])) (define (html$-article-close footertext) | > | | | > | 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 | ◊string-append{<article class="no-title hentry"> <h1><a href="#" class="rel-bookmark"> <time datetime="◊published" class="entry-title">◊ymd->english[published]</time> </a></h1> <section class="entry-content">}])) (define (html$-article-close footertext) (cond [(non-empty-string? footertext) ◊string-append{</section> <footer class="article-info"><span class="x">(</span>◊|footertext|<span class="x">)</span></footer> </article>}] [else "</article>"])) (define (html$-page-body-close) ◊string-append{<footer>By Joel Dueck</footer> </main></body>}) ;; Notes ;; |
︙ | ︙ |
Modified web-extra/martin.css.pp from [4ed28dc5] to [2c3ce09a].
︙ | ︙ | |||
323 324 325 326 327 328 329 | p { margin: 0; text-indent: 0; } p + p { | | > > > > > > > > > > > > > > > | 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 | p { margin: 0; text-indent: 0; } p + p { text-indent: 2em; } section.entry-content blockquote { font-size: ◊x-lineheight[0.7]; line-height: ◊derive-lineheight[7 #:per-lines 6]; margin: ◊x-lineheight[1.0] 2em; } section.entry-content blockquote:first-child { margin-top: 0; } section.entry-content blockquote footer::before { content: '—'; /* Em-dash */ } section.entry-content blockquote footer { margin-top: ◊x-lineheight[1]; text-align: right; width: calc(100% + 2em); } section.entry-content h2 { font-size: 1.2rem; font-style: italic; margin: ◊x-lineheight[1] 0; font-weight: normal; |
︙ | ︙ |