Add support for top-level SVG attributes, fixes #26

It turns out I had a pretty good idea how to do this cleanly, so I
went ahead and implemented a solution.

Author: brunchboy

CHANGELOG.md

@@ -8,6 +8,15 @@ This change log follows the conventions of
 
 Nothing so far.
 
+## [1.6.0] - 2021-09-08
+
+### Added
+
+- A new predefined value, `svg-attrs`, which starts out as an empty
+  map, but can be redefined to add arbitrary SVG attributes to the
+  top-level SVG node of your diagram (for example, to set a background
+  color for the entire diagram).
+
 ## [1.5.0] - 2020-07-12
 
 ### Added

README.md

@@ -139,7 +139,7 @@ extension.)
 
 To check for outdated dependencies, you can run:
 
-    clojure -A:outdated
+    clojure -M:outdated
 
 ## Releasing
 
@@ -155,7 +155,7 @@ version in `package.json`, tag and push to GitHub, then run:
 <a href="http://deepsymmetry.org"><img align="right" alt="Deep Symmetry"
  src="doc/assets/DS-logo-bw-200-padded-left.png" width="216" height="123"></a>
 
-Copyright © 2020 [Deep Symmetry, LLC](http://deepsymmetry.org)
+Copyright © 2020–2021 [Deep Symmetry, LLC](http://deepsymmetry.org)
 
 Distributed under the [Eclipse Public License
 2.0](https://opensource.org/licenses/EPL-2.0). By using this software

deps.edn

@@ -1,7 +1,7 @@
 ;; Clojure dependency information and source location.
-{:deps    {thheller/shadow-cljs     {:mvn/version "2.8.93"}
-           org.clojure/tools.reader {:mvn/version "1.3.2"}
-           analemma                 {:mvn/version "1.1.0"}
+{:deps    {thheller/shadow-cljs     {:mvn/version "2.15.9"}
+           org.clojure/tools.reader {:mvn/version "1.3.6"}
+           analemma/analemma        {:mvn/version "1.1.0"}
            borkdude/sci             {:git/url "https://github.com/borkdude/sci.git"
                                      :sha     "26944ee9e1349fecd113ac6075bd66306ce3a6f8"}}
  ;; When sci is released with the shadow-cljs fix, {:mvn/version "0.0.13-alpha.13"} ?

doc/antora.yml

@@ -7,7 +7,7 @@ asciidoc:
   attributes:
     icons: font
     experimental: ''
-    page-copyright: 2020
+    page-copyright: 2020–2021
     page-pagination: ''
 nav:
 - modules/ROOT/nav.adoc

doc/modules/ROOT/pages/values.adoc

@@ -18,25 +18,25 @@ number).
 |===
 |Variable |Default Value |Purpose
 
-|left-margin |40 | How far from the left edge of the diagram the first
+|left-margin |40 |How far from the left edge of the diagram the first
  box begins. This default is large enough to accommodate the row
  address labels for all but extremely long byte fields. If you are
  drawing a single row (which won’t have a row label), it’s nice to set
  this to `1` so the diagram is centered.
 
-|right-margin |1 | How far from the right edge of the diagram the last
+|right-margin |1 |How far from the right edge of the diagram the last
  box ends. This default is just large enough to make sure the box
  boundary doesn’t get clipped. You can make it bigger if you want to
  draw custom content there.
 
-|bottom-margin |1 | How far from the bottom edge of the diagram the
+|bottom-margin |1 |How far from the bottom edge of the diagram the
  last row of boxes ends. This default is just large enough to make
  sure the box boundaries don’t get clipped. You can make it bigger if
  you want to draw custom content there.
 
 | | |
 
-|box-width |40 | How much horizontal space each box takes up.
+|box-width |40 |How much horizontal space each box takes up.
 
 |boxes-per-row |16 |How many boxes are drawn on a row before moving to
  the next row. The default is 16, so that the hexadecimal row labels
@@ -51,7 +51,15 @@ number).
  the `:labels` attribute when calling
  <<funcs.adoc#draw-column-headers,`draw-column-headers`>>.
 
-|row-height |30 | How much vertical space a row of boxes takes up.
+|row-height |30 |How much vertical space a row of boxes takes up.
+
+|svg-attrs |{} |A map that can contain arbitrary
+https://developer.mozilla.org/en-US/docs/Web/SVG/Attribute[SVG
+attributes] to be added to the top-level SVG element in the diagram.
+For example, if you want the entire diagram to have a solid white
+background color rather than its transparent default, you could:
+
+`(def svg-attrs {:style "background-color:white"})`
 
 | | |