present per document metadata

1 files changed, 21 insertions, 13 deletions

diff --git a/org/out_harvest_metadata.org b/org/out_harvest_metadata.org
index ebea75a..9c954a0 100644
--- a/org/out_harvest_metadata.org
+++ b/org/out_harvest_metadata.org
@@ -100,6 +100,7 @@ hvst.harvest.language              = doc_matters.src.language;
 hvst.harvest.uid                   = doc_matters.src.doc_uid;
 hvst.harvest.date_published        = doc_matters.conf_make_meta.meta.date_published;
 hvst.harvest.topic_register_arr    = doc_matters.conf_make_meta.meta.classify_topic_register_arr;
+hvst.harvest.path_html_metadata    = pth_html_rel.fn_metadata(doc_matters.src.filename);
 hvst.harvest.path_html_scroll      = pth_html_rel.fn_scroll(doc_matters.src.filename);
 hvst.harvest.path_html_segtoc      = pth_html_rel.fn_seg(doc_matters.src.filename, "toc");
 hvst.harvest.path_abs_html_scroll  = pth_html_abs.fn_scroll(doc_matters.src.filename);
@@ -217,12 +218,10 @@ foreach(k, doc_harvest; hvst.harvests) {
 <a name="up" id="up"></a>
 <a name="start" id="start"></a>
 <h1>Metadata Harvest - Topics (output organised by language &amp; filetype)</h1>
-<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] also see <a href="authors.html">Metadata Harvest - Authors</a></p>
+<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] [<a href="authors.html">&nbsp;Metadata&nbsp;Harvest&nbsp;-&nbsp;Authors&nbsp;</a>]</p>
 <p><a href="#A">A</a>,&nbsp;<a href="#B">B</a>,&nbsp;<a href="#C">C</a>,&nbsp;<a href="#D">D</a>,&nbsp;<a href="#E">E</a>,&nbsp;<a href="#F">F</a>,&nbsp;<a href="#G">G</a>,&nbsp;<a href="#H">H</a>,&nbsp;<a href="#I">I</a>,&nbsp;<a href="#J">J</a>,&nbsp;<a href="#K">K</a>,&nbsp;<a href="#L">L</a>,&nbsp;<a href="#M">M</a>,&nbsp;<a href="#N">N</a>,&nbsp;<a href="#O">O</a>,&nbsp;<a href="#P">P</a>,&nbsp;<a href="#Q">Q</a>,&nbsp;<a href="#R">R</a>,&nbsp;<a href="#S">S</a>,&nbsp;<a href="#T">T</a>,&nbsp;<a href="#U">U</a>,&nbsp;<a href="#V">V</a>,&nbsp;<a href="#W">W</a>,&nbsp;<a href="#X">X</a>,&nbsp;<a href="#Y">Y</a>,&nbsp;<a href="#Z">Z</a>,&nbsp;
 <p></p>
 <hr />
-<p class="tiny"><a href="../../en/manifest/topics.html">English</a>&nbsp;&nbsp;&nbsp;</p>
-<hr />
 #+END_SRC
 
 *** harvested topics html head theme insert
@@ -277,10 +276,12 @@ foreach(k0;
             );
           }
         }
-        topics ~= format(q"┃<p class="work"><a href="%s">"%s"</a> -%s┃",
+        topics ~= format(q"┃<p class="work"><a href="%s">"%s"</a> - %s [<a href="%s">&nbsp;%s&nbsp;</a>]┃",
           t_a_.path_html_segtoc,
           t_a_.title,
           _auth,
+          t_a_.path_html_metadata,
+          t_a_.language,
         ) ~ "\n";
         if (_opt_action.very_verbose) {
           writeln("- ", t_a_.title, " - ", t_a_.author);
@@ -317,10 +318,12 @@ foreach(k0;
                 );
               }
             }
-            topics ~= format(q"┃<p class="work"><a href="%s">%s</a> -%s┃",
+            topics ~= format(q"┃<p class="work"><a href="%s">%s</a> - %s [<a href="%s">&nbsp;%s&nbsp;</a>]┃",
               t_a_.path_html_segtoc,
               t_a_.title,
               _auth,
+              t_a_.path_html_metadata,
+              t_a_.language,
             ) ~ "\n";
             if (_opt_action.very_verbose) {
               writeln("  - ", t_a_.title, " - ", t_a_.author);
@@ -358,10 +361,12 @@ foreach(k0;
                   );
                 }
               }
-              topics ~= format(q"┃<p class="work"><a href="%s">%s</a> -%s┃",
+              topics ~= format(q"┃<p class="work"><a href="%s">%s</a> - %s [<a href="%s">&nbsp;%s&nbsp;</a>]┃",
                 t_a_.path_html_segtoc,
                 t_a_.title,
                 _auth,
+                t_a_.path_html_metadata,
+                t_a_.language,
               ) ~ "\n";
               if (_opt_action.very_verbose) {
                 writeln("    - ", t_a_.title, " - ", t_a_.author);
@@ -399,10 +404,12 @@ foreach(k0;
                     );
                   }
                 }
-                topics ~= format(q"┃ <p class="work"><a href="%s">%s</a> -%s┃",
+                topics ~= format(q"┃ <p class="work"><a href="%s">%s</a> - %s [<a href="%s">&nbsp;%s&nbsp;</a>]┃",
                   t_a_.path_html_segtoc,
                   t_a_.title,
                   _auth,
+                  t_a_.path_html_metadata,
+                  t_a_.language,
                 ) ~ "\n";
                 if (_opt_action.very_verbose) {
                   writeln("      - ", t_a_.title, " - ", t_a_.author);
@@ -494,11 +501,9 @@ template spineMetaDocHarvestsAuthors() {
 <a name="up" id="up"></a>
 <a name="start" id="start"></a>
 <h1>Metadata Harvest - Authors (output organised by language &amp; filetype)</h1>
-<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] also see <a href="topics.html">Metadata Harvest - Topics</a></p>
+<p>[<a href="../../index.html">&nbsp;HOME&nbsp;</a>] [<a href="topics.html">&nbsp;Metadata&nbsp;Harvest&nbsp;-&nbsp;Topics&nbsp;</a>]</p>
 <p></p>
 <hr />
-<p class="tiny"><a href="../../en/manifest/authors.html">English</a>&nbsp;&nbsp;&nbsp;</p>
-<hr />
 <p><a href="#A">A</a>,&nbsp;<a href="#B">B</a>,&nbsp;<a href="#C">C</a>,&nbsp;<a href="#D">D</a>,&nbsp;<a href="#E">E</a>,&nbsp;<a href="#F">F</a>,&nbsp;<a href="#G">G</a>,&nbsp;<a href="#H">H</a>,&nbsp;<a href="#I">I</a>,&nbsp;<a href="#J">J</a>,&nbsp;<a href="#K">K</a>,&nbsp;<a href="#L">L</a>,&nbsp;<a href="#M">M</a>,&nbsp;<a href="#N">N</a>,&nbsp;<a href="#O">O</a>,&nbsp;<a href="#P">P</a>,&nbsp;<a href="#Q">Q</a>,&nbsp;<a href="#R">R</a>,&nbsp;<a href="#S">S</a>,&nbsp;<a href="#T">T</a>,&nbsp;<a href="#U">U</a>,&nbsp;<a href="#V">V</a>,&nbsp;<a href="#W">W</a>,&nbsp;<a href="#X">X</a>,&nbsp;<a href="#Y">Y</a>,&nbsp;<a href="#Z">Z</a>,&nbsp;
 #+END_SRC
 
@@ -526,31 +531,34 @@ template spineMetaDocHarvestsAuthors() {
       ) {
         if (doc_harvest.author_surname_fn != _prev_auth) {
           _au[doc_harvest.author_surname_fn]
-          = format(q"┃<p class="author"><a name="%s" class="lev0">%s</a></p> <p class="publication">%s "<a href="%s">%s</a>" [%s]</p>┃",
+          = format(q"┃<p class="author"><a name="%s" class="lev0">%s</a></p> <p class="publication">%s "<a href="%s">%s</a>" [<a href="%s">&nbsp;%s&nbsp;</a>]</p>┃",
             doc_harvest.author_surname.translate([' ' : "_"]),
             doc_harvest.author_surname_fn,
             (doc_harvest.date_published.length > 0)
               ? doc_harvest.date_published : "",
             doc_harvest.path_html_segtoc,
             doc_harvest.title,
+            doc_harvest.path_html_metadata,
             doc_harvest.language,
           );
           _prev_auth = doc_harvest.author_surname_fn;
         } else {
           _au[doc_harvest.author_surname_fn]
-          ~= format(q"┃<p class="publication">%s "<a href="%s">%s</a>" [%s]</p>┃",
+          ~= format(q"┃<p class="publication">%s "<a href="%s">%s</a>" [<a href="%s">&nbsp;%s&nbsp;</a>]</p>┃",
             (doc_harvest.date_published.length > 0)
               ? doc_harvest.date_published : "",
             doc_harvest.path_html_segtoc,
             doc_harvest.title,
+            doc_harvest.path_html_metadata,
             doc_harvest.language,
           );
         }
-        _author_date_title ~= format(q"┃%s %s "%s" [%s]%s┃",
+        _author_date_title ~= format(q"┃%s %s "%s" [<a href="%s">&nbsp;%s&nbsp;</a>]%s┃",
           doc_harvest.author_surname_fn,
           (doc_harvest.date_published.length > 0)
             ? "(" ~ doc_harvest.date_published ~ ")" : "",
           doc_harvest.title,
+          doc_harvest.path_html_metadata,
           doc_harvest.language,
           (_opt_action.very_verbose) ? "\n  " ~ doc_harvest.path_abs_html_scroll : "",
         );