From aae005b24ce816d89bcda6e72de2cdeadcf7ded0 Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Sat, 17 Sep 2016 16:45:36 -0400
Subject: heading anchor_tags and cleaning

---
 org/ao_output_debugs.org | 32 ++++++++++++++++++++++++++++----
 1 file changed, 28 insertions(+), 4 deletions(-)

(limited to 'org/ao_output_debugs.org')

diff --git a/org/ao_output_debugs.org b/org/ao_output_debugs.org
index 4b79a54..86728e1 100644
--- a/org/ao_output_debugs.org
+++ b/org/ao_output_debugs.org
@@ -62,8 +62,7 @@ debug(parent) {
     if (obj.use == "content") {
       if (obj.is_a == "heading") {
         writefln(
-          "%s%s node: %s heading: %s %s",
-          scr_txt_marker["cyan"],
+          "%s node: %s heading: %s %s",
           obj.obj_cite_number,
           obj.node,
           obj.lev_markup_number,
@@ -319,6 +318,32 @@ debug(biblio) {
 
 #+END_SRC
 
+** anchor tags
+
+#+name: ao_output_debugs
+#+BEGIN_SRC d
+debug(anchor) {
+  writefln(
+    "%s\n%s:%s",
+    "-------------------------------",
+    __FILE__,
+    __LINE__,
+  );
+  foreach (obj; contents) {
+    if (obj.is_a == "heading") {
+      writefln(
+        "%s~ [%s] %s %s",
+        obj.heading_attrib.lev,
+        obj.obj_cite_number,
+        obj.anchor_tags,
+        // "[", obj["is"], "] ",
+        obj.object
+      );
+    }
+  }
+}
+#+END_SRC
+
 ** (headings)                                                     :headings:
 
 #+name: ao_output_debugs
@@ -398,8 +423,7 @@ debug(headings) {
   foreach (obj; contents) {
     if (obj.is_a == "heading") {
       writefln(
-        "%s%s~ [%s] %s",
-        scr_txt_marker["yellow"],
+        "%s~ [%s] %s",
         obj.heading_attrib.lev,
         obj.obj_cite_number,
         // "[", obj["is"], "] ",
-- 
cgit v1.2.3