aboutsummaryrefslogtreecommitdiffhomepage
path: root/org/ao_defaults.org
diff options
context:
space:
mode:
authorRalph Amissah <ralph@amissah.com>2016-11-01 10:06:47 -0400
committerRalph Amissah <ralph@amissah.com>2019-04-10 15:14:13 -0400
commit0079c34ce7a524d4b93ed56191b5e7cf6a380975 (patch)
treeaf9d3fad63937e1b8d5eefa2bdabbcea2325ce91 /org/ao_defaults.org
parentsync, fix level :A split info (diff)
0.8.0 the document parts (& org babel tangle)
Diffstat (limited to 'org/ao_defaults.org')
-rw-r--r--org/ao_defaults.org23
1 files changed, 13 insertions, 10 deletions
diff --git a/org/ao_defaults.org b/org/ao_defaults.org
index 3758a2f..2677f78 100644
--- a/org/ao_defaults.org
+++ b/org/ao_defaults.org
@@ -157,7 +157,8 @@ template SiSUregisters() {
"language" : "",
"main" : "",
"note" : "",
- "sub" : ""
+ "sub" : "",
+ "subtitle" : ""
]
];
return meta_;
@@ -529,13 +530,14 @@ static name_delimiter = ctRegex!(`^([^,]+)[ ]*,[ ]+(.+?)$`);
static book_index_go = ctRegex!("([0-9]+)(?:-[0-9]+)?");
static trailing_comma = ctRegex!(",[ ]*$");
static trailing_linebreak = ctRegex!(",[ ]{1,2}\\\\\\\\\n[ ]{4}$","m");
-static line_delimiter = ctRegex!("\n");
-static line_delimiter_ws_strip = ctRegex!("[ ]*\n[ ]*");
-static line_delimiter_only = ctRegex!("^\n");
-static para_delimiter = ctRegex!("\n[ ]*\n+");
-static levels_markup = ctRegex!(`^[A-D1-4]$`);
-static levels_numbered = ctRegex!(`^[0-9]$`);
-static levels_numbered_headings = ctRegex!(`^[0-7]$`);
+static newline_eol_delimiter = ctRegex!("\n");
+static newline_eol_strip_preceeding = ctRegex!("[ ]*\n");
+static newline_eol_delimiter_only = ctRegex!("^\n");
+static line_delimiter_ws_strip = ctRegex!("[ ]*\n[ ]*");
+static para_delimiter = ctRegex!("\n[ ]*\n+");
+static levels_markup = ctRegex!(`^[A-D1-4]$`);
+static levels_numbered = ctRegex!(`^[0-9]$`);
+static levels_numbered_headings = ctRegex!(`^[0-7]$`);
#+END_SRC
** filename (and path) matching (including markup insert file) :insert:file:path:filename:
@@ -581,7 +583,8 @@ static native_header_sub = ctRegex!(`^[ ]*:(?P<subheader>[a-z_]+)
// static native_header_sub = ctRegex!(`^[ ]+:([a-z_]+):\s`);
static native_header_meta_title = ctRegex!(`^@title:\s`, "m");
static variable_doc_title = ctRegex!(`@title`);
-static variable_doc_author = ctRegex!(`@author`);
+static variable_doc_author = ctRegex!(`@author|@creator`);
+static raw_author_munge = ctRegex!(`(\S.+?),\s+(.+)`,"i");
#+END_SRC
** subheader :native:subheader:
@@ -607,7 +610,7 @@ static native_subhead_make = ctRegex!(`^(?:cover_image|home_button_
#+BEGIN_SRC d
/+ heading & paragraph operators +/
static heading_a = ctRegex!(`^:?[A][~] `, "m");
-static heading = ctRegex!(`^:?([A-D1-4])[~]([a-z0-9_.-]*[?]?) `);
+static heading = ctRegex!(`^:?([A-D1-4])[~]([a-z0-9_.-]*[?]?)\s+`,"i");
static heading_marker = ctRegex!(`^:?([A-D1-4])[~]`);
static heading_anchor_tag = ctRegex!(`^:?[A-D1-4][~]([a-z0-9_.-]+) `,"i");
static heading_identify_anchor_tag = ctRegex!(`^:?[A-D1-4][~]\s+(?:(?:(?:chapter|article|section|clause)\s+[0-9.]+)|(?:[0-9]+))`,"i"); // unless dob.obj =~/^:?[A-D1-4]~\s+(?:|(?:chapter|article|section|clause)\s+)([0-9.]+)/i