From 0c693b23c4ff8f98a151884a24f150a5ff746dd4 Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph.amissah@gmail.com>
Date: Fri, 16 Oct 2020 19:16:18 -0400
Subject: org mode, unique code-block names & adjust headers

-  avoid org-mode undefined behavior, provide
   unique code-block names
---
 org/output_hub.org | 39 +++++++++++++++++++++++++--------------
 1 file changed, 25 insertions(+), 14 deletions(-)

(limited to 'org/output_hub.org')

diff --git a/org/output_hub.org b/org/output_hub.org
index 5116c7c..7b8b96c 100644
--- a/org/output_hub.org
+++ b/org/output_hub.org
@@ -7,6 +7,7 @@
 #+COPYRIGHT:   Copyright (C) 2015 - 2020 Ralph Amissah
 #+LANGUAGE:    en
 #+STARTUP:     content hideblocks hidestars noindent entitiespretty
+#+OPTIONS:     H:3 num:nil toc:t \n:nil @:t ::t |:t ^:nil _:nil -:t f:t *:t <:t
 #+PROPERTY:    header-args  :exports code
 #+PROPERTY:    header-args+ :noweb yes
 #+PROPERTY:    header-args+ :eval no
@@ -38,7 +39,15 @@ template outputHub() {
     enum outTask { source_or_pod, sqlite, sqlite_multi, latex, odt, epub, html_scroll, html_seg, html_stuff }
     void Scheduled(D,I)(int sched, D doc_abstraction, I doc_matters) {
       auto msg = Msg!()(doc_matters);
-      <<output_scheduled_task>>
+      <<output_scheduled_task_source_or_pod>>
+      <<output_scheduled_task_epub>>
+      <<output_scheduled_task_html_meta>>
+      <<output_scheduled_task_html_scroll>>
+      <<output_scheduled_task_html_seg>>
+      <<output_scheduled_task_html_out>>
+      <<output_scheduled_task_latex>>
+      <<output_scheduled_task_odt>>
+      <<output_scheduled_task_sqlite>>
     }
     if (!(doc_matters.opt.action.quiet)) {
       writeln(" ", doc_matters.src.filename_base);
@@ -61,7 +70,9 @@ template outputHubOp() {
   @system void outputHubOp(E,O,C)(E env, O opt_action, C config) {
     mixin spineRgxOut;
     static auto rgx = RgxO();
-    <<output_options_op>>
+    <<output_options_op_sqlite_db_drop>>
+    <<output_options_op_sqlite_db_create>>
+    <<output_options_op_cgi_search_form_codegen>>
   }
 }
 #+END_SRC
@@ -82,7 +93,7 @@ import doc_reform.io_out,
 **** source: _dr_src_ &/or _pod_                                     :source:pod:
 - [[./output_pod.org][output_pod]]
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_source_or_pod
 #+BEGIN_SRC d
 if (sched == outTask.source_or_pod) {
   if (doc_matters.opt.action.source) {
@@ -104,7 +115,7 @@ if (sched == outTask.source_or_pod) {
 
 **** epub                                                              :epub:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_epub
 #+BEGIN_SRC d
 if (sched == outTask.epub) {
   msg.v("epub3 processing... ");
@@ -117,7 +128,7 @@ if (sched == outTask.epub) {
 **** html                                                              :html:
 ***** metadata                                                     :metadata:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_html_meta
 #+BEGIN_SRC d
 if (sched == outTask.html_stuff) {
   outputMetadata!()(doc_matters);
@@ -127,7 +138,7 @@ if (sched == outTask.html_stuff) {
 
 ***** scroll                                                         :scroll:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_html_scroll
 #+BEGIN_SRC d
 if (sched == outTask.html_scroll) {
   msg.v("html scroll processing... ");
@@ -139,7 +150,7 @@ if (sched == outTask.html_scroll) {
 
 ***** seg                                                               :seg:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_html_seg
 #+BEGIN_SRC d
 if (sched == outTask.html_seg) {
   msg.v("html seg processing... ");
@@ -151,7 +162,7 @@ if (sched == outTask.html_seg) {
 
 ***** css, images etc                                            :css:images:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_html_out
 #+BEGIN_SRC d
 if (sched == outTask.html_stuff) {
   import doc_reform.io_out.html;
@@ -163,7 +174,7 @@ if (sched == outTask.html_stuff) {
 
 **** latex / pdf                                                  :latex:pdf:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_latex
 #+BEGIN_SRC d
 if (sched == outTask.latex) {
   msg.v("latex processing... (available for downstream processing & pdf output");
@@ -175,7 +186,7 @@ if (sched == outTask.latex) {
 
 **** odf / odt                                                      :odf:odt:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_odt
 #+BEGIN_SRC d
 if (sched == outTask.odt) {
   msg.v("odf:odt processing... ");
@@ -187,7 +198,7 @@ if (sched == outTask.odt) {
 
 **** sqlite discrete                                                 :sqlite:
 
-#+NAME: output_scheduled_task
+#+NAME: output_scheduled_task_sqlite
 #+BEGIN_SRC d
 if (sched == outTask.sqlite) {
   msg.v("sqlite processing... ");
@@ -219,7 +230,7 @@ if (doc_matters.opt.action.sqlite_update) {
 ***** no markup source files to process
 ******  drop                                                           :drop:
 
-#+NAME: output_options_op
+#+NAME: output_options_op_sqlite_db_drop
 #+BEGIN_SRC d
 if ((opt_action.sqlite_db_drop)) {
   if ((opt_action.verbose)) {
@@ -235,7 +246,7 @@ if ((opt_action.sqlite_db_drop)) {
 
 ******  create                                                       :create:
 
-#+NAME: output_options_op
+#+NAME: output_options_op_sqlite_db_create
 #+BEGIN_SRC d
 if ((opt_action.sqlite_db_create)) {
   if ((opt_action.verbose)) {
@@ -252,7 +263,7 @@ if ((opt_action.sqlite_db_create)) {
 
 ****  cgi sqlite search form
 
-#+NAME: output_options_op
+#+NAME: output_options_op_cgi_search_form_codegen
 #+BEGIN_SRC d
 if ((opt_action.cgi_search_form_codegen)) {
   if ((opt_action.verbose)) {
-- 
cgit v1.2.3