@@ -182,15 +182,17 @@ (let* ([note-id (build-note-id note-tx)] [title-tx (make-note-title pagenode parent-title-plain)] [title-html (->html title-tx #:splice? #t)] [author (maybe-attr 'author attrs default-authorname)] [author-url (maybe-attr 'author-url attrs)] + [note-srcline (maybe-attr 'srcline attrs)] [content-html (html$-note-contents disp-mark disp-verb elems)] [listing-full (html$-note-listing-full pagenode note-id title-html note-date + note-srcline content-html author author-url)]) (insert-one! (cache-conn) (make-cache:note