◊(Local Yarn Code "Check-in [3911576e]")

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: 3911576ed099a7441e26bf0ee04113e8bcffd88b50ab344ac89893f9a59662ef
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

212

213
214
215
216
217
218
219
                   pagenode
                   note-count)]
          [(and (note-count . > . 0) (string=? disposition ""))
           (format "There is <a href=\"/~a#furthernotes\">a note</a> appended."
                   pagenode)]
          [else ""]))
  

  (format "~a ~a ~a" series-part disp-part notes-part))

    

;; ~~~ Notes ~~~

;; Save a collection of ◊note tags to the DB, and return the HTML of the complete
;; “Further Notes” section at the end
;;







>
|
>







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

76
77
78

79
80
81
82
83
84
85
     ◊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)

  ◊string-append{</section>
 <footer class="article-info"><span class="x">(</span>◊|footertext|<span class="x">)</span></footer>
 </article>})

 
(define (html$-page-body-close)
  ◊string-append{<footer>By Joel Dueck</footer>
 </main></body>})

;; Notes
;;







>
|
|
|
>







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
330
331
332
333
334
335















336
337
338
339
340
341
342

    p {
        margin: 0;
        text-indent: 0;
    }

    p + p {
        text-indent: 1em;
    }

    section.entry-content blockquote {
        font-size: ◊x-lineheight[0.7];
        line-height: ◊derive-lineheight[7 #:per-lines 6];















    }

    section.entry-content h2 {
        font-size: 1.2rem;
        font-style: italic;
        margin: ◊x-lineheight[1] 0;
        font-weight: normal;







|





>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







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;