Nicolas Goaziou <m...@nicolasgoaziou.fr> writes:
>> + (t
>> + (org-element-set-contents
>> + item (nconc
>> + (mapcar (lambda (key) `(keyword (:key "KINDEX" :value ,key)))
>> kindex)
>> + (mapcar (lambda (cmd) `(keyword (:key "FINDEX" :value ,cmd)))
>> findex)
>> + (org-element-contents item))))))))
>
> Indentation seems a bit off, otherwise, LGTM.
Are you only referring to the spaces that should be replaced with a tab?
"item (nconc\n" is also a bit weird so I changed that to
(org-element-set-contents
item
(nconc (mapcar (lambda (key) `(keyword (:key "KINDEX" :value ,key)))
kindex)
(mapcar (lambda (cmd) `(keyword (:key "FINDEX" :value ,cmd)))
findex)
(org-element-contents item))))))))
Cheers,
Jonas
