[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] [PATCH] Wrap: override default

From: Bastien
Subject: Re: [O] [PATCH] Wrap: override default
Date: Mon, 24 Dec 2012 09:43:59 +0100
User-agent: Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.3.50 (gnu/linux)

Hi Michael,

Michael Gauland <address@hidden> 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 ...)

I'll mark it as "not applicable".  I let you propose another
patch if you still need to fix an issue in this area.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]