Preserve command order in help, accept functions as cmdspec

Author: plexus

CHANGELOG.md

@@ -2,9 +2,11 @@
 
 ## Added
 
+- Allow a command spec to be just a function
+
 ## Fixed
 
-## Changed
+- Preserve command order in help text when using a vector
 
 # 0.4.24 (2024-02-17 / 5a1e316)
 
@@ -60,4 +62,4 @@ approaching the envisioned scope for this library.
 
 - subcommand handling 
 - rudimentary flag handling
-- help text generation
+- help text generation

src/lambdaisland/cli.clj

@@ -164,14 +164,17 @@
     (var? ?var)
     (assoc (meta ?var) :command ?var)
 
+    (fn? ?var)
+    {:command ?var}
+
     (var? (:command ?var))
     (merge (meta (:command ?var)) ?var)
 
     :else
     ?var))
 
 (defn prepare-cmdpairs [commands]
-  (let [m (if (vector? commands) (apply hash-map commands) commands)]
+  (let [m (if (vector? commands) (partition 2 commands) commands)]
     (map (fn [[k v]]
            (let [v (to-cmdspec v)
                  [[cmd] doc argnames] (parse-arg-names k)]