[elpa] externals/taxy b27fa67ecf: Release: 0.10.1

[ELPA Syncer]

branch: externals/taxy
commit b27fa67ecf3f8954ce0d5c2747d1de4dc94ff09f
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Release: 0.10.1
---
 README.org         |   5 ++
 examples/diredy.el |  47 ++++++++--------
 taxy.el            |   2 +-
 taxy.info          | 156 ++++++++++++++++++++++++++++-------------------------
 4 files changed, 115 insertions(+), 95 deletions(-)

diff --git a/README.org b/README.org
index eda8bec32a..47f6e116e5 100644
--- a/README.org
+++ b/README.org
@@ -933,6 +933,11 @@ In Emacs 28+, see also =M-x shortdoc-display-group RET 
taxy RET=.
 :TOC:      :depth 0
 :END:
 
+** 0.10.1
+
+*Examples*
++ Fixed byte-compilation of ~diredy.el~.
+
 ** 0.10
 
 *Examples*
diff --git a/examples/diredy.el b/examples/diredy.el
index 0aa2670271..ba204d6796 100644
--- a/examples/diredy.el
+++ b/examples/diredy.el
@@ -34,24 +34,30 @@
 (require 'dired)
 (require 'mailcap)
 
+;;;; Functions
+
+(eval-and-compile
+  (defun diredy--machine-size (size)
+    "Return number of bytes represented by human-readable SIZE."
+    (declare (pure t) (side-effect-free t))
+    (let ((case-fold-search t))
+      (string-match (rx bos (group (1+ digit)) (0+ space)
+                        (group (repeat 1 (any "kmg")))
+                        (optional (optional "i") "b"))
+                    size)
+      (* (pcase (match-string 2 size)
+           ((or "k" "K") 1024)
+           ((or "m" "M") (* 1024 1024))
+           ((or "g" "G") (* 1024 1024 1024)))
+         (string-to-number (match-string 1 size))))))
+
 ;;;; Variables
 
 (defvar diredy-taxy
-  (cl-macrolet ((machine-size
-                 (size) (let ((case-fold-search t))
-                          (string-match (rx bos (group (1+ digit)) (0+ space)
-                                            (group (repeat 1 (any "kmg")))
-                                            (optional (optional "i") "b"))
-                                        size)
-                          (* (pcase (match-string 2 size)
-                               ((or "k" "K") 1024)
-                               ((or "m" "M") (* 1024 1024))
-                               ((or "g" "G") (* 1024 1024 1024)))
-                             (string-to-number (match-string 1 size)))))
-                (label
+  (cl-macrolet ((label
                  (prefix size)
                  (propertize (concat prefix " " size)
-                             :machine-size (number-to-string (machine-size 
size)))))
+                             :machine-size (number-to-string 
(diredy--machine-size size)))))
     (cl-labels ((file-name
                  (string) (let* ((start (text-property-not-all 0 (length 
string) 'dired-filename nil string))
                                  (end (text-property-any start (length string) 
'dired-filename nil string)))
@@ -66,17 +72,17 @@
                 (file-size-group
                  (string) (pcase (file-size (file-name string))
                             ('nil "No size")
-                            ((pred (<= (machine-size "1G")))
+                            ((pred (<= (diredy--machine-size "1G")))
                              (label ">=" "1G"))
-                            ((pred (<= (machine-size "100M")))
+                            ((pred (<= (diredy--machine-size "100M")))
                              (label ">=" "100M"))
-                            ((pred (<= (machine-size "10M")))
+                            ((pred (<= (diredy--machine-size "10M")))
                              (label ">=" "10M"))
-                            ((pred (<= (machine-size "1M")))
+                            ((pred (<= (diredy--machine-size "1M")))
                              (label ">=" "1M"))
-                            ((pred (<= (machine-size "100K")))
+                            ((pred (<= (diredy--machine-size "100K")))
                              (label ">=" "100K"))
-                            ((pred (<= (machine-size "1K")))
+                            ((pred (<= (diredy--machine-size "1K")))
                              (label ">=" "1K"))
                             (_ (label "<" "1K"))))
                 (file-dir? (string) (if (file-directory-p (file-name string))
@@ -127,9 +133,6 @@
       (taxy-magit-section-insert filled-taxy :items 'first
        :initial-depth 0 :blank-between-depth 1))))
 
-;;;; Functions
-
-
 ;;;; Footer
 
 (provide 'diredy)
diff --git a/taxy.el b/taxy.el
index 90c5761f7c..0e26abf43b 100644
--- a/taxy.el
+++ b/taxy.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Adam Porter <adam@alphapapa.net>
 ;; URL: https://github.com/alphapapa/taxy.el
 ;; Package-Requires: ((emacs "26.3"))
-;; Version: 0.10
+;; Version: 0.10.1
 ;; Keywords: lisp
 
 ;; This program is free software; you can redistribute it and/or modify
diff --git a/taxy.info b/taxy.info
index 1b70f939e1..5406876a44 100644
--- a/taxy.info
+++ b/taxy.info
@@ -76,6 +76,7 @@ Reference
 
 Changelog
 
+* 0.10.1: 0101. 
 * 0.10: 010. 
 * 0.9: 09. 
 * 0.8: 08. 
@@ -1135,6 +1136,7 @@ File: README.info,  Node: Changelog,  Next: Development,  
Prev: Usage,  Up: Top
 
 * Menu:
 
+* 0.10.1: 0101. 
 * 0.10: 010. 
 * 0.9: 09. 
 * 0.8: 08. 
@@ -1147,9 +1149,18 @@ File: README.info,  Node: Changelog,  Next: Development, 
 Prev: Usage,  Up: Top
 * 0.1: 01. 
 
 
-File: README.info,  Node: 010,  Next: 09,  Up: Changelog
+File: README.info,  Node: 0101,  Next: 010,  Up: Changelog
 
-4.1 0.10
+4.1 0.10.1
+==========
+
+*Examples*
+   • Fixed byte-compilation of ‘diredy.el’.
+
+
+File: README.info,  Node: 010,  Next: 09,  Prev: 0101,  Up: Changelog
+
+4.2 0.10
 ========
 
 *Examples*
@@ -1160,7 +1171,7 @@ File: README.info,  Node: 010,  Next: 09,  Up: Changelog
 
 File: README.info,  Node: 09,  Next: 08,  Prev: 010,  Up: Changelog
 
-4.2 0.9
+4.3 0.9
 =======
 
 * Menu:
@@ -1170,7 +1181,7 @@ File: README.info,  Node: 09,  Next: 08,  Prev: 010,  Up: 
Changelog
 
 File: README.info,  Node: Changes,  Up: 09
 
-4.2.1 Changes
+4.3.1 Changes
 -------------
 
    • Library ‘taxy-magit-section’ is now packaged separately
@@ -1182,7 +1193,7 @@ File: README.info,  Node: Changes,  Up: 09
 
 File: README.info,  Node: 08,  Next: 07,  Prev: 09,  Up: Changelog
 
-4.3 0.8
+4.4 0.8
 =======
 
 * Menu:
@@ -1193,7 +1204,7 @@ File: README.info,  Node: 08,  Next: 07,  Prev: 09,  Up: 
Changelog
 
 File: README.info,  Node: Additions,  Next: Fixes,  Up: 08
 
-4.3.1 Additions
+4.4.1 Additions
 ---------------
 
    • Short documentation group for Emacs 28+.
@@ -1201,7 +1212,7 @@ File: README.info,  Node: Additions,  Next: Fixes,  Up: 08
 
 File: README.info,  Node: Fixes,  Prev: Additions,  Up: 08
 
-4.3.2 Fixes
+4.4.2 Fixes
 -----------
 
    • Require ‘map’ for ‘pcase’ pattern.
@@ -1209,7 +1220,7 @@ File: README.info,  Node: Fixes,  Prev: Additions,  Up: 08
 
 File: README.info,  Node: 07,  Next: 06,  Prev: 08,  Up: Changelog
 
-4.4 0.7
+4.5 0.7
 =======
 
 * Menu:
@@ -1219,7 +1230,7 @@ File: README.info,  Node: 07,  Next: 06,  Prev: 08,  Up: 
Changelog
 
 File: README.info,  Node: Additions (1),  Up: 07
 
-4.4.1 Additions
+4.5.1 Additions
 ---------------
 
    • Function ‘taxy-flatten’ returns a list of the items in a taxy and
@@ -1231,7 +1242,7 @@ File: README.info,  Node: Additions (1),  Up: 07
 
 File: README.info,  Node: 06,  Next: 05,  Prev: 07,  Up: Changelog
 
-4.5 0.6
+4.6 0.6
 =======
 
 * Menu:
@@ -1241,7 +1252,7 @@ File: README.info,  Node: 06,  Next: 05,  Prev: 07,  Up: 
Changelog
 
 File: README.info,  Node: Additions (2),  Up: 06
 
-4.5.1 Additions
+4.6.1 Additions
 ---------------
 
    • Sorting functions:
@@ -1271,7 +1282,7 @@ File: README.info,  Node: Additions (2),  Up: 06
 
 File: README.info,  Node: 05,  Next: 04,  Prev: 06,  Up: Changelog
 
-4.6 0.5
+4.7 0.5
 =======
 
 * Menu:
@@ -1282,7 +1293,7 @@ File: README.info,  Node: 05,  Next: 04,  Prev: 06,  Up: 
Changelog
 
 File: README.info,  Node: Additions (3),  Next: Fixes (1),  Up: 05
 
-4.6.1 Additions
+4.7.1 Additions
 ---------------
 
    • Function ‘taxy-magit-section-insert’ takes new arguments:
@@ -1304,7 +1315,7 @@ File: README.info,  Node: Additions (3),  Next: Fixes 
(1),  Up: 05
 
 File: README.info,  Node: Fixes (1),  Prev: Additions (3),  Up: 05
 
-4.6.2 Fixes
+4.7.2 Fixes
 -----------
 
    • Example ‘diredy’ referred to an old function name.
@@ -1312,7 +1323,7 @@ File: README.info,  Node: Fixes (1),  Prev: Additions 
(3),  Up: 05
 
 File: README.info,  Node: 04,  Next: 03,  Prev: 05,  Up: Changelog
 
-4.7 0.4
+4.8 0.4
 =======
 
    • Incremented version to cause a new ELPA release (since removing a
@@ -1321,7 +1332,7 @@ File: README.info,  Node: 04,  Next: 03,  Prev: 05,  Up: 
Changelog
 
 File: README.info,  Node: 03,  Next: 02,  Prev: 04,  Up: Changelog
 
-4.8 0.3
+4.9 0.3
 =======
 
 * Menu:
@@ -1332,7 +1343,7 @@ File: README.info,  Node: 03,  Next: 02,  Prev: 04,  Up: 
Changelog
 
 File: README.info,  Node: Changes (1),  Next: Fixes (2),  Up: 03
 
-4.8.1 Changes
+4.9.1 Changes
 -------------
 
    • Within the ‘taxy’ struct and related functions, the term ‘objects’
@@ -1343,7 +1354,7 @@ File: README.info,  Node: Changes (1),  Next: Fixes (2),  
Up: 03
 
 File: README.info,  Node: Fixes (2),  Prev: Changes (1),  Up: 03
 
-4.8.2 Fixes
+4.9.2 Fixes
 -----------
 
    • Function ‘taxy-fill’ always calls a taxy’s ‘:take’ function if
@@ -1355,8 +1366,8 @@ File: README.info,  Node: Fixes (2),  Prev: Changes (1),  
Up: 03
 
 File: README.info,  Node: 02,  Next: 01,  Prev: 03,  Up: Changelog
 
-4.9 0.2
-=======
+4.10 0.2
+========
 
 * Menu:
 
@@ -1367,8 +1378,8 @@ File: README.info,  Node: 02,  Next: 01,  Prev: 03,  Up: 
Changelog
 
 File: README.info,  Node: Changes (2),  Next: Additions (4),  Up: 02
 
-4.9.1 Changes
--------------
+4.10.1 Changes
+--------------
 
    • Function ‘taxy-take-keyed*’ is renamed to ‘taxy-take-keyed’,
      replacing the old function: it’s more powerful, and there’s little
@@ -1377,8 +1388,8 @@ File: README.info,  Node: Changes (2),  Next: Additions 
(4),  Up: 02
 
 File: README.info,  Node: Additions (4),  Next: Fixes (3),  Prev: Changes (2), 
 Up: 02
 
-4.9.2 Additions
----------------
+4.10.2 Additions
+----------------
 
    • Struct ‘taxy’ now has a ‘:make’ slot, a function called to make new
      sub-taxys by ‘take-take-keyed’ (defaulting to ‘make-taxy’).  This
@@ -1395,8 +1406,8 @@ File: README.info,  Node: Additions (4),  Next: Fixes 
(3),  Prev: Changes (2),
 
 File: README.info,  Node: Fixes (3),  Prev: Additions (4),  Up: 02
 
-4.9.3 Fixes
------------
+4.10.3 Fixes
+------------
 
    • ‘taxy-magit-section’’s ‘insert-object’ function.
    • ‘taxy-fill’ now applies objects to the root taxy if no sub-taxys
@@ -1405,7 +1416,7 @@ File: README.info,  Node: Fixes (3),  Prev: Additions 
(4),  Up: 02
 
 File: README.info,  Node: 01,  Prev: 02,  Up: Changelog
 
-4.10 0.1
+4.11 0.1
 ========
 
 First tagged version.
@@ -1457,51 +1468,52 @@ GPLv3
 
 Tag Table:
 Node: Top218
-Node: Examples2301
-Node: Numbery (starting basically)2620
-Node: Lettery (filling incrementally)8381
-Node: Sporty (understanding completely)10895
-Node: Applications16882
-Node: Installation17357
-Node: Usage17670
-Node: Reusable taxys19825
-Node: Threading macros23978
-Node: Modifying filled taxys24517
-Node: Dynamic taxys25335
-Node: Multi-level dynamic taxys27985
-Node: "Chains" of independent multi-level dynamic taxys30178
-Node: Defining a classification domain-specific language33109
-Node: Magit section37272
-Node: Reference37940
-Node: Functions38148
-Node: Macros40126
-Node: Changelog40776
-Node: 01041016
-Node: 0941219
-Node: Changes41329
-Node: 0841701
-Node: Additions41822
-Node: Fixes41966
-Node: 0742104
-Node: Additions (1)42230
-Node: 0642549
-Node: Additions (2)42675
-Node: 0544025
-Node: Additions (3)44172
-Node: Fixes (1)45282
-Node: 0445440
-Node: 0345662
-Node: Changes (1)45805
-Node: Fixes (2)46172
-Node: 0246611
-Node: Changes (2)46783
-Node: Additions (4)47075
-Node: Fixes (3)47998
-Node: 0148252
-Node: Development48353
-Node: Copyright assignment48559
-Node: Credits49147
-Node: License49337
+Node: Examples2318
+Node: Numbery (starting basically)2637
+Node: Lettery (filling incrementally)8398
+Node: Sporty (understanding completely)10912
+Node: Applications16899
+Node: Installation17374
+Node: Usage17687
+Node: Reusable taxys19842
+Node: Threading macros23995
+Node: Modifying filled taxys24534
+Node: Dynamic taxys25352
+Node: Multi-level dynamic taxys28002
+Node: "Chains" of independent multi-level dynamic taxys30195
+Node: Defining a classification domain-specific language33126
+Node: Magit section37289
+Node: Reference37957
+Node: Functions38165
+Node: Macros40143
+Node: Changelog40793
+Node: 010141050
+Node: 01041197
+Node: 0941413
+Node: Changes41523
+Node: 0841895
+Node: Additions42016
+Node: Fixes42160
+Node: 0742298
+Node: Additions (1)42424
+Node: 0642743
+Node: Additions (2)42869
+Node: 0544219
+Node: Additions (3)44366
+Node: Fixes (1)45476
+Node: 0445634
+Node: 0345856
+Node: Changes (1)45999
+Node: Fixes (2)46366
+Node: 0246805
+Node: Changes (2)46979
+Node: Additions (4)47273
+Node: Fixes (3)48198
+Node: 0148454
+Node: Development48555
+Node: Copyright assignment48761
+Node: Credits49349
+Node: License49539
 
 End Tag Table