contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[chronometrist-details] fix Programming key-value display; add docstring

This commit is contained in:
contrapunctus 2021-06-27 15:01:26 +05:30
parent 2297bb7393
commit 6e78eaf6a9
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
init.org
View File

@ -599,7 +599,10 @@ Return nil (and run `magit-status') if the user answers no."
***** display-key-values
#+BEGIN_SRC emacs-lisp
;; (contrapunctus-objects-to-string " - " nil) => ""
;; (contrapunctus-objects-to-string " - " 1) => "1"
(defun contrapunctus-objects-to-string (separator &rest args)
"Return ARGS as a string, removing nil values."
(mapconcat (lambda (elt)
(format "%s" elt))
(flatten-list
@ -614,7 +617,7 @@ Return nil (and run `magit-status') if the user answers no."
(-let [(&plist :project project
:feature feature
:component component) plist]
(contrapunctus-objects-to-string " " project feature component)))
(contrapunctus-objects-to-string " - " project component feature)))
("Guitar"
(-let* (((&plist :piece
(&plist :name name