From c6e822e3ce4b096163e0016e5735ef9c16e8997f Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph.amissah@gmail.com>
Date: Tue, 8 Sep 2026 18:44:45 -0400
Subject: html metadata: a link to the ocda.db

The metadata page gains a line between the markup source and the
source digests.

(assisted by Claude-Code)
---
 src/sisudoc/outputs/io_out/metadata.d | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

(limited to 'src/sisudoc/outputs')

diff --git a/src/sisudoc/outputs/io_out/metadata.d b/src/sisudoc/outputs/io_out/metadata.d
index 853fb83..1634b9a 100644
--- a/src/sisudoc/outputs/io_out/metadata.d
+++ b/src/sisudoc/outputs/io_out/metadata.d
@@ -510,10 +510,16 @@ string theme_light_1 = format(q"┃
         ~ "&nbsp;🫛&nbsp;zipped&nbsp;</a>|&nbsp;"
         ~ "<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ doc_matters.src.filename_base ~ "/\" class=\"lnkicon\">"
         ~ "&nbsp;🫛&nbsp;tree&nbsp;</a>]&nbsp;";
-      /+ .ssp peg parsable source, interesting (path may be of interest for downloading) but renders poorly visually in browser +/
-      // metadata_ ~= "<p class=\"lev1\">●&nbsp;&nbsp;.ssp [peg parsable source]:"
-      //   ~              "<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ doc_matters.src.filename_base ~ "/media/abstraction/" ~  doc_matters.src.filename_base ~ "." ~ doc_matters.src.language ~ ".ssp\" class=\"lnkicon\">"
-      //   ~ "&nbsp;🗎&nbsp;.ssp [peg parsable source]&nbsp;</a>]</p>";
+      {
+        auto pths_pod_ = spinePathsPods!()(doc_matters);
+        string _db_name = doc_matters.src.doc_uid_out ~ ".ocda.db";
+        string _db_fn   = pths_pod_.pod_dir_() ~ "/" ~ _db_name;
+        if (doc_matters.opt.action.ocda_db && _db_fn.exists) {
+          metadata_ ~= "<p class=\"lev1\">●&nbsp;&nbsp;document abstraction:"
+            ~ "&nbsp;[<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ _db_name ~ "\" class=\"lnkicon\">"
+            ~ "&nbsp;🫛&nbsp;ocda.db&nbsp;</a>]</p>";
+        }
+      }
       metadata_ ~= "<p class=\"lev1\">●&nbsp;&nbsp;source digests:"
         ~ "&nbsp;[&nbsp;<a href=\"../../" ~ pth_pod.internal_base ~ "/" ~ doc_matters.src.filename_base ~ ".digests.txt\" class=\"lnkizipcon\">"
         ~ "&nbsp;#&nbsp;digests&nbsp;</a>]</p>";
-- 
cgit v1.2.3