From mboxrd@z Thu Jan 1 00:00:00 1970 From: Mohamed HIBTI Subject: Re: Bibtex export Date: Thu, 20 Dec 2012 16:13:50 +0100 Message-ID: References: <87a9t8u75x.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=047d7b625236a3c8d504d14a2dfa Return-path: Received: from eggs.gnu.org ([208.118.235.92]:48012) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Tlhot-00054N-QU for emacs-orgmode@gnu.org; Thu, 20 Dec 2012 10:14:02 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Tlhom-0001VM-WF for emacs-orgmode@gnu.org; Thu, 20 Dec 2012 10:13:59 -0500 Received: from mail-ee0-f52.google.com ([74.125.83.52]:51759) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Tlhom-0001UF-MN for emacs-orgmode@gnu.org; Thu, 20 Dec 2012 10:13:52 -0500 Received: by mail-ee0-f52.google.com with SMTP id d17so1701662eek.25 for ; Thu, 20 Dec 2012 07:13:50 -0800 (PST) In-Reply-To: <87a9t8u75x.fsf@gmail.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-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: Myles English Cc: emacs-orgmode@gnu.org --047d7b625236a3c8d504d14a2dfa Content-Type: text/plain; charset=ISO-8859-1 Thanks Myles, This is realy what I want. I have just to fix something (may be my org-version). The variable org-export-before-processing-hook seems missing. I have org-version 7.8.10 (with emacs 24.2.1) Regards, Mohame 2012/12/20 Myles English > > mohamed writes: > > > Myles, > > Thank you for this answer. > > I tried it with > > ------------------------------- > > (add-to-list 'org-export-preprocess-hook > > 'my-export-delete-headlines-tagged-noheading) > > ------------------------------- > > Sorry, I should have said: add it to org-export-before-processing-hook, > so you use it like this: > > #+begin_src emacs-lisp > (defun my-export-delete-headlines-tagged-noheading (backend) > (dolist (hl (nreverse (org-element-map (org-element-parse-buffer > 'headline) > 'headline > 'identity))) > (when (member "noheading" (org-element-property :tags hl)) > (goto-char (org-element-property :begin hl)) > (delete-region (point) (progn (forward-line) (point)))))) > > (add-to-list 'org-export-before-processing-hook > 'my-export-delete-headlines-tagged-noheading) > #+end_src > > Myles > > > > > > > But I got some errors when exporting > > > > ----------------------------------------------------------------- > > Exporting to LaTeX... run-hooks: Wrong number of > > arguments: (lambda (backend) (dolist (hl (nreverse (org-element-map > > (org-element-parse-buffer (quote headline)) (quote headline) (quote > identity)))) > > (when (member "noheading" (org-element-property :tags hl)) (goto-char > > (org-element-property :begin hl)) (delete-region (point) (progn > (forward-line) > > (point)))))), 0 (my-export-delete-headlines-tagged-noheading) > > ----------------------------------------------------------------- > > > > > > I guess I have to use it in another way. My knowledge of lisp > programming is > > very limited. > > > > Regards, > > Mohamed > > --047d7b625236a3c8d504d14a2dfa Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Thanks Myles,
This is realy what I want. I have just to fix something (m= ay be my org-version).
The variable org-export-before-processing-hook se= ems missing.
I have org-version 7.8.10 (with emacs 24.2.1)
Regards, Mohame

2012/12/20 Myles English <my= lesenglish@gmail.com>

mohamed writes:

> Myles,
> Thank you for this answer.
> I tried it with
> -------------------------------
> (add-to-list 'org-export-preprocess-hook
> 'my-export-delete-headlines-tagged-noheading)
> -------------------------------

Sorry, I should have said: add it to org-export-before-processing-hook,
so you use it like this:

#+begin_src emacs-lisp
(defun my-export-delete-headlines-tagged-noheading (backend)
=A0 (dolist (hl (nreverse (org-element-map (org-element-parse-buffer 'h= eadline)
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0= =A0 =A0'headline
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0= =A0 =A0'identity)))
=A0 =A0 (when (member "noheading" (org-element-property :tags hl)= )
=A0 =A0 =A0 (goto-char (org-element-property :begin hl))
=A0 =A0 =A0 (delete-region (point) (progn (forward-line) (point))))))

(add-to-list 'org-export-before-processing-hook
=A0 =A0 =A0 =A0 =A0 =A0 =A0'my-export-delete-headlines-tagged-noheading= )
#+end_src

Myles

>
>
> But I got some errors when exporting
>
> -----------------------------------------------------------------
> Exporting to LaTeX... =A0run-hooks: Wrong number of
> arguments: (lambda (backend) (dolist (hl (nreverse (org-element-map > (org-element-parse-buffer (quote headline)) (quote headline) (quote id= entity))))
> (when (member "noheading" (org-element-property :tags hl)) (= goto-char
> (org-element-property :begin hl)) (delete-region (point) (progn (forwa= rd-line)
> (point)))))), 0 (my-export-delete-headlines-tagged-noheading)
> -----------------------------------------------------------------
>
>
> I guess I have to use it in another way. My knowledge of lisp programm= ing is
> very limited.
>
> Regards,
> Mohamed


--047d7b625236a3c8d504d14a2dfa--