Hi Michael, Michael Gauland <mikely...@no8wireless.co.nz> writes:
> (setq end (point-marker)) > ;; possibly wrap result > (cond > - ((assoc :wrap (nth 2 info)) > + ((and (assoc :wrap (nth 2 info)) > + (cdr (assoc :wrap (nth 2 info)))) > (let ((name (or (cdr (assoc :wrap (nth 2 info))) "RESULTS"))) > (funcall wrap (concat "#+BEGIN_" name) (concat "#+END_" > name)))) > ((member "html" result-params) Well, the patch is wrong, if (cdr (assoc :wrap (nth 2 info))) is in the (and ...) sexp, no need to have it in the (or ...) sexp? I'll mark it as "not applicable". I let you propose another patch if you still need to fix an issue in this area. Thanks! -- Bastien
