Index: crystalize.rkt
==================================================================
--- crystalize.rkt
+++ crystalize.rkt
@@ -296,13 +296,13 @@
                            "must be in format \"[symbol] [past-tense-verb]\""
                            "disposition attr"
                            disposition-attr))
   
   ;; Parse out remaining columns
-  (define author (maybe-attr 'author attrs))
+  (define author (maybe-attr 'author attrs default-authorname))
   (define note-id (build-note-id note-tx))
-  (define title-html-flow (html$-note-title author pagenode parent-title-plain))
+  (define title-html-flow (html$-note-title pagenode parent-title-plain))
   (define author-url (maybe-attr 'author-url attrs))
   (define-values (disp-mark disp-verb) (disposition-values disposition-attr))
   (define content-html (html$-note-contents disp-mark (get-elements note-tx)))
   (define listing-full-html
     (html$-note-listing-full pagenode note-id title-html-flow note-date content-html author author-url))

Index: snippets-html.rkt
==================================================================
--- snippets-html.rkt
+++ snippets-html.rkt
@@ -80,32 +80,25 @@
           </article>}]
         [else "</section></article>"]))
 
 (define (html$-article-listing-short pagenode pubdate title)
   ◊string-append{
-  <li><a href="/◊(symbol->string pagenode)">
-    <div class="article-list-date caps">◊(ymd->english pubdate)</div>
-    <div class="article-list-title">◊|title|</div>
-  </a></li>})
+ <li><a href="/◊(symbol->string pagenode)">
+ <div class="article-list-date caps">◊(ymd->english pubdate)</div>
+ <div class="article-list-title">◊|title|</div>
+ </a></li>})
 
 (define (html$-page-body-close)
   ◊string-append{<footer>By Joel Dueck</footer>
  </main></body>})
 
 ;; Notes
 ;;
-(define (html$-note-title author pagenode parent-title)
-  (define author-part
-    (cond [(and (non-empty-string? author)
-                (not (string-ci=? author default-authorname)))
-           (format "A note from ~a, " author)]
-          [else ""]))
-  (define article-part
-    (format "Re: <a class=\"cross-reference\" href=\"/~a\">~a</a>"
-            pagenode
-            parent-title))
-  (string-append author-part article-part))
+(define (html$-note-title pagenode parent-title)
+  (format "Re: <a class=\"cross-reference\" href=\"/~a\">~a</a>"
+          pagenode
+          parent-title))
 
 (define (html$-note-contents disposition-mark elems)
   (define-values (first-tag first-attrs first-elems) (txexpr->values (car elems)))
   (define disposition
     (cond [(non-empty-string? disposition-mark)
@@ -128,18 +121,18 @@
             </div>}]
           [else ◊string-append{
             <div class="note-meta">
             &mdash;<span class="h-card"><i>◊|author|</i></span>
             </div>}]))
-  (define maybe-author-class?
+  (define maybe-author-class
     (cond [(string=? author default-authorname) "by-proprietor"]
           [else ""]))
   
   ◊string-append{
- <article class="with-title ◊maybe-author-class? hentry">
- <h1 class="entry-title">◊|title-html-flow|</h1>
- <p class="time"><a href="◊|pagenode|◊note-id" class="rel-bookmark note-permlink">
+ <article class="with-title ◊maybe-author-class hentry">
+ <h1 class="entry-title note-full">◊|title-html-flow|</h1>
+ <p class="time"><a href="/◊|pagenode|#◊note-id" class="rel-bookmark note-permlink">
  <time datetime="◊date">◊ymd->english[date]</time>
  </a></p>
  <section class="entry-content">
  <div class="p-content p-name">◊|contents|</div>
  ◊author-part

Index: web-extra/martin.css.pp
==================================================================
--- web-extra/martin.css.pp
+++ web-extra/martin.css.pp
@@ -207,20 +207,24 @@
         font-style: italic;
         font-weight: normal;
     }
 
     /* Titles non-bold, non-smallcaps by default. This can be overridden in document markup. */
-    article>h1.entry-title {
+    h1.entry-title {
         margin: 0 0 0 0;
         text-transform: none;
         font-style: normal;
         line-height: 1.7rem;
     }
+
+    h1.entry-title.note-full {
+        font-feature-settings: "smcp" on, "liga" on, "clig" on, "dlig" on, "kern" on, "onum" on, "pnum" on;
+    }
 
     /* This <SPAN> class is used in titles for Notes appended to earlier articles */
     h1.entry-title .cross-reference {
-        font-feature-settings: "scmp" off, "liga" on, "clig" on, "dlig" on, "kern" on, "onum" on, "pnum" on;
+        font-feature-settings: "smcp" off, "liga" on, "clig" on, "dlig" on, "kern" on, "onum" on, "pnum" on;
         font-style: italic;
         text-transform: none;
     }
 
     /* I want my *title* permlinks not to be green or underlined. Just your basic raven black, dark green on hover.