From mboxrd@z Thu Jan  1 00:00:00 1970
From: Ken Mankoff <mankoff@gmail.com>
Subject: Re: [ANN] Export block syntax change
Date: Mon, 21 Dec 2015 06:09:09 -0500
Message-ID: <m2si2whxd6.fsf@gmail.com>
References: <87vb7sakyj.fsf@nicolasgoaziou.fr>
Mime-Version: 1.0
Content-Type: text/plain
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:60158)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <mankoff@gmail.com>) id 1aAyL6-0003cb-6B
	for emacs-orgmode@gnu.org; Mon, 21 Dec 2015 06:09:17 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <mankoff@gmail.com>) id 1aAyL2-0006mK-2C
	for emacs-orgmode@gnu.org; Mon, 21 Dec 2015 06:09:16 -0500
Received: from mail-qg0-x22e.google.com ([2607:f8b0:400d:c04::22e]:36400)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <mankoff@gmail.com>) id 1aAyL1-0006mE-UM
	for emacs-orgmode@gnu.org; Mon, 21 Dec 2015 06:09:11 -0500
Received: by mail-qg0-x22e.google.com with SMTP id c96so81683990qgd.3
	for <emacs-orgmode@gnu.org>; Mon, 21 Dec 2015 03:09:11 -0800 (PST)
In-reply-to: <87vb7sakyj.fsf@nicolasgoaziou.fr>
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Cc: Org Mode List <emacs-orgmode@gnu.org>


Does this new syntax support that oft (or occasionally?) requested LaTeX header export?

I don't think so out of the box, because while LaTeX is a valid export word, LaTeX_preamble is not.

But, can the new syntax be used like this?

    \include{preamble}
    #+BEGIN_EXPORT LaTeX :file preamble.tex
    % preamble commands go here
    #+END_EXPORT

Thanks,

  -k.



On 2015-12-20 at 16:06, Nicolas Goaziou <mail@nicolasgoaziou.fr> wrote:
> Hello,
>
> I just finalized the syntax change for export blocks. As a reminder, the
> new syntax is:
>
>   #+BEGIN_EXPORT backend
>   ...
>   #+END_EXPORT
>
> instead of
>
>   #+BEGIN_backend
>   ...
>   #+END_backend
>
> So, basically, "export" is a reserved block type, much like "src". As
> a consequence, INCLUDE keywords syntax is modified, e.g.,
>
>   #+INCLUDE: "file.org" HTML
>
> becomes
>
>   #+INCLUDE: "file.org" export html
>
> The following function, included in ORG-NEWS, updates any Org document
> to the new syntax. It is meant to be applied after applying the patch.
>
>   (defun org-repair-export-blocks ()
>     "Repair export blocks and INCLUDE keywords in current buffer."
>     (when (eq major-mode 'org-mode)
>       (let ((case-fold-search t)
>             (back-end-re (regexp-opt
>                           '("HTML" "ASCII" "LATEX" "ODT" "MARKDOWN" "MD" "ORG"
>                             "MAN" "BEAMER" "TEXINFO" "GROFF" "KOMA-LETTER")
>                           t)))
>         (org-with-wide-buffer
>          (goto-char (point-min))
>          (let ((block-re (concat "^[ \t]*#\\+BEGIN_" back-end-re)))
>            (save-excursion
>              (while (re-search-forward block-re nil t)
>                (let ((element (save-match-data (org-element-at-point))))
>                  (when (eq (org-element-type element) 'special-block)
>                    (save-excursion
>                      (goto-char (org-element-property :end element))
>                      (save-match-data (search-backward "_"))
>                      (forward-char)
>                      (insert "EXPORT")
>                      (delete-region (point) (line-end-position)))
>                    (replace-match "EXPORT \\1" nil nil nil 1))))))
>          (let ((include-re
>                 (format "^[ \t]*#\\+INCLUDE: .*?%s[ \t]*$" back-end-re)))
>            (while (re-search-forward include-re nil t)
>              (let ((element (save-match-data (org-element-at-point))))
>                (when (and (eq (org-element-type element) 'keyword)
>                           (string= (org-element-property :key element) "INCLUDE"))
>                  (replace-match "EXPORT \\1" nil nil nil 1)))))))))
>
>
> Regards,