From 7ea0afbd1c9c160d6c17e79b69cc225f30c2236d Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph.amissah@gmail.com>
Date: Thu, 13 Jun 2019 12:06:58 -0400
Subject: topic register sort adjust Aa-Zz

---
 org/doc_reform.org | 22 +++++++++++++++++-----
 1 file changed, 17 insertions(+), 5 deletions(-)

(limited to 'org/doc_reform.org')

diff --git a/org/doc_reform.org b/org/doc_reform.org
index b4bce52..7ba6dfe 100644
--- a/org/doc_reform.org
+++ b/org/doc_reform.org
@@ -181,10 +181,13 @@ void main(string[] args) {
         doc_harvest.title,
         doc_harvest.author,
         (doc_harvest.date_published.length > 0) ? " (" ~ doc_harvest.date_published ~ ")" : "",
-        _topic_register.sort!("toUpper(a) < toUpper(b)", SwapStrategy.stable).release.join("\n"),
+        _topic_register.sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable).release.join("\n"),
       );
     }
-    foreach(k0; subject_trees.keys.sort) {
+    foreach(k0;
+      (subject_trees.keys)
+      .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
+    ) {
       if (k0 != "_a") {
         writeln("", k0);
         if ("_a" in subject_trees[k0]) {
@@ -193,7 +196,10 @@ void main(string[] args) {
           }
         }
       }
-      foreach(k1; subject_trees[k0].keys.sort) {
+      foreach(k1;
+        (subject_trees[k0].keys)
+        .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
+      ) {
         if (k1 != "_a") {
           writeln("  ", k1);
           if ("_a" in subject_trees[k0][k1]) {
@@ -202,7 +208,10 @@ void main(string[] args) {
             }
           }
         }
-        foreach(k2; subject_trees[k0][k1].keys.sort) {
+        foreach(k2;
+          (subject_trees[k0][k1].keys)
+          .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
+        ) {
           if (k2 != "_a") {
             writeln("    ", k2);
             if ("_a" in subject_trees[k0][k1][k2]) {
@@ -211,7 +220,10 @@ void main(string[] args) {
               }
             }
           }
-          foreach(k3; subject_trees[k0][k1][k2].keys.sort) {
+          foreach(k3;
+            (subject_trees[k0][k1][k2].keys)
+            .sort!("toUpper(a) < toUpper(b)", SwapStrategy.unstable)
+          ) {
             if (k3 != "_a") {
               writeln("      ", k3);
               foreach (uid; subject_trees[k0][k1][k2][k3]) {
-- 
cgit v1.2.3