.gitignore

@@ -8,4 +8,3 @@
 /.DS_Store
 /elisp/gourmet.el
 /elisp/wd-imaas.el
-/ha-theme-results.org

ha-theme-colors.svg

@@ -1,7 +1,4 @@
-<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
-<svg xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink"
-     width="800px"
-     viewBox="0 0 357.12 594.72">
+<svg xmlns='http://www.w3.org/2000/svg' class="pikchr" viewBox="0 0 357.12 594.72">
 <path d="M2.16,74.16L110.16,74.16L110.16,2.16L2.16,2.16Z"  style="fill:rgb(12,9,6);stroke-width:2.16;stroke:rgb(134,1,22);" />
 <text x="56.16" y="28.08" text-anchor="middle" fill="rgb(134,1,22)" dominant-baseline="central">Red</text>
 <text x="56.16" y="48.24" text-anchor="middle" fill="rgb(134,1,22)" dominant-baseline="central">#860116</text>
@@ -66,3 +63,4 @@
 <text x="300.96" y="546.48" text-anchor="middle" fill="rgb(153,122,139)" dominant-baseline="central">Purple-lt</text>
 <text x="300.96" y="566.64" text-anchor="middle" fill="rgb(153,122,139)" dominant-baseline="central">#997a8b</text>
 </svg>
+

ha-theme-grays.svg

@@ -1,4 +1,4 @@
-<svg xmlns='http://www.w3.org/2000/svg' class="pikchr" viewBox="0 0 451.526 306.72" width="800px">
+<svg xmlns='http://www.w3.org/2000/svg' class="pikchr" viewBox="0 0 451.526 306.72">
 <path d="M2.16,52.56L151.229,52.56L151.229,2.16L2.16,2.16Z"  style="fill:rgb(242,241,239);stroke-width:1.4472;stroke:rgb(12,9,6);" />
 <text x="76.6944" y="17.28" text-anchor="middle" fill="rgb(12,9,6)" dominant-baseline="central">H:30 S:1  V:95%</text>
 <text x="76.6944" y="37.44" text-anchor="middle" fill="rgb(12,9,6)" dominant-baseline="central">#f2f1ef</text>

ha-theme.org

@@ -2,7 +2,7 @@
 #+author: Howard Abrams
 #+date:   2024-06-18
 #+filetags: emacs hamacs
-#+lastmod: [2024-11-26 Tue]
+#+lastmod: [2024-11-22 Fri]
 
 A literate programming file for defining a warm, autumn, but subtle color theme for Emacs.
 
@@ -25,9 +25,9 @@ A literate programming file for defining a warm, autumn, but subtle color theme
   ;;
   ;;; Commentary:
   ;;
-  ;; These color themes, designed for use with Emacs' built-in theme
-  ;; support in Emacs 24, also work with older Emacs versions, in which
-  ;; case, require color-theme.el.
+  ;; These color themes are designed for use with Emacs' built-in
+  ;; theme support in Emacs 24. However, they also work with older Emacs
+  ;; versions, in which case color-theme.el is required.
   ;;
   ;; Usage:
   ;;
@@ -348,16 +348,13 @@ Let’s make a /theme/:
      `(link ((t (:foreground ,link-color))))
      `(link-visited ((t (:foreground ,visited-color))))
 
-     `(font-lock-comment-face ((t (:foreground ,gray-65))))
+     `(font-lock-comment-face ((t (:foreground ,gray-70))))
      `(font-lock-comment-delimiter-face ((t (:foreground ,gray-50))))
-     `(font-lock-string-face ((t (:foreground ,gray-75))))
+     `(font-lock-string-face ((t (:foreground ,gray-90))))
      `(font-lock-type-face ((t (:foreground ,green-lt))))
      `(font-lock-doc-face ((t (:foreground ,almond))))
-     ;; References like `reference' in doc strings:
-     `(font-lock-constant-face ((t (:foreground ,link-color))))
-     ;; Keywords like :this
+     `(font-lock-constant-face ((t (:foreground ,orange-lt))))
      `(font-lock-builtin-face ((t (:foreground ,red-lt))))
-     ;; Like defun or `interactive'
      `(font-lock-keyword-face ((t (:foreground ,green-lt))))
      `(font-lock-function-name-face ((t (:foreground ,blue :weight ultra-bold))))
      `(font-lock-property-use-face ((t (:foreground ,blue-lt))))
@@ -416,16 +413,37 @@ Let’s make a /theme/:
      `(vertico-group-separator ((t (:foreground ,gray-45))))
      `(vertico-group-multiline ((t (:foreground ,gray-45))))
      `(vertico-group-title ((t (:foreground ,gray-45))))
-
-     `(sh-heredoc ((t (:foreground ,almond))))
-     `(sh-quoted-exec ((t (:foreground ,orange2-lt))))
-
-     `(ahs-face ((t (:foreground ,orange-lt :background unspecified))))
-     `(ahs-plugin-default-face ((t (:foreground unspecified :background unspecified))))
      ))
 #+END_SRC
 
-[[file:ha-theme-results.png]]
+Let’s see how Org-formatted faces look:
+  - *bold*
+  - /italics/
+  - _underlined_
+  - =verbatim=
+  - ~code, er keys~
+
+Functions and variables would look like:
+
+#+begin_src emacs-lisp :tangle no
+  (defun function-name (arg1 arg2)
+    "The doc string is part string and part comment.
+    (interactive "P")
+    (list "strings not crazy" 2 :keywords-moreso))
+#+end_src
+
+And YAML specifically:
+#+BEGIN_SRC yaml-ts :tangle no
+  foo:
+    number: 42
+    string: Nothing much
+    quoted_string: "Nothing much"
+    boolean: true
+    multiline: >
+      Here we go with {{ substitutions }} from Jinja/Ansible
+#+END_SRC
+
+
 * Technical Artifacts                          :noexport:
 
 Let's =provide= a name so we can =require= this file:

snippets/markdown-mode/example

@@ -1,7 +0,0 @@
-# -*- mode: snippet -*-
-# name: example
-# key: <e
-# --
-\`\`\`text
-$0
-\`\`\`

snippets/markdown-mode/figure

@@ -1,6 +1,6 @@
 # key: <ss
 # name: shell
 # --
-\`\`\`bash
+```bash
 ${0}
-\`\`\`
+```