fix(cli): wrong-number-of-args error from mapconcat

On Emacs <=28.2, mapconcat's third argument isn't optional.

Amend: 7f175ab6d9
Ref: #8024
This commit is contained in:
Henrik Lissner 2024-08-30 04:38:25 -04:00
parent 8c4d871f7c
commit 79910fba42
No known key found for this signature in database
GPG key ID: B60957CA074D39A3

View file

@ -114,7 +114,18 @@ OPTIONS:
(defun doom-sync--system-hash () (defun doom-sync--system-hash ()
(secure-hash (secure-hash
'md5 (mapconcat #'identity (list doom-local-dir system-configuration)))) 'md5 (mapconcat
#'identity
(list
;; Changes to this path could indicate a change to the username and/or
;; the location of Straight's build artifacts; both warrant a rebuild
;; of your packages.
doom-local-dir
;; Changes to this indicate the user's system/OS has changed (e.g. if
;; the user copied their config to another system, on another OS) or
;; Emacs' compiled features have (even if the major version hasn't).
system-configuration)
"")))
(defun doom-sync--abort-warning-h () (defun doom-sync--abort-warning-h ()
(print! (warn "Script was abruptly aborted, leaving Doom in an incomplete state!")) (print! (warn "Script was abruptly aborted, leaving Doom in an incomplete state!"))