Hello,
Aaron Ecay <aarone...@gmail.com> writes:
> The simple patch attached to this message fixes a bug that my testing
> indicated was responsible for erroneous re-evaluations at least some
> of the time.
Thank you. A minor comment follows.
> (cons :result-type (cond ((member "output" result-params) 'output)
> ((member "value" result-params) 'value)
> (t 'value))))
> - (org-babel-get-header params :var 'other))))
> + (loop for item in params
> + unless (memq (car item) '(:colname-names
> + :rowname-names
> + :result-params
> + :result-type
> + :var))
> + collect item))))
Using `loop' here is, IMO, over-doing it. You can use instead, e.g.,
(org-remove-if
(lambda (item)
(memq (car item)
'(:colname-names :rowname-names :result-params :result-type :var)))
params)
Another option is to extend `org-babel-get-header' to accept a list of
keys instead of a single key.
In any case, this patch, or a variant thereof, should be applied to
maint.
Regards,
--
Nicolas Goaziou
