emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Ista Zahn <istazahn@gmail.com>
To: John Kitchin <jkitchin@andrew.cmu.edu>
Cc: emacs-orgmode Mailinglist <emacs-orgmode@gnu.org>,
	Alan L Tyree <alantyree@gmail.com>
Subject: Re: Export each top level heading to separate file
Date: Sun, 5 Jan 2014 19:55:54 -0500	[thread overview]
Message-ID: <CA+vqiLGCuW4ZtMkSS7Opd8fxcFYYjCp4ufoQMZesYtP=CJ1m-Q@mail.gmail.com> (raw)
In-Reply-To: <CAJ51ETphMdomtM0BXYF89owwXxFrRruzi4pjS_xq-rQk86k_EQ@mail.gmail.com>

On Sun, Jan 5, 2014 at 4:56 PM, John Kitchin <jkitchin@andrew.cmu.edu> wrote:
> hmm.. I don't know if it was a bug, I ran the code on my system before
> sending it, and it worked for me ;)

Your original code ran for me as well, but it inserted
'::EXPORT_FILE_NAME::' where it should be just ':EXPORT_FILE_NAME:'

 I am glad you figured it out on your
> system.
>
> you could avoid the double if statements like this:
>
>
> (defun my-exp-headings-to-markdown ()
>   "Export each top-level heading to markdown."
>   (interactive)
>   (org-map-entries
>    (lambda ()
>      (let ((level (nth 1 (org-heading-components)))
>            (title (nth 4 (org-heading-components))))
>        (when (= level 1)
>          (org-entry-put (point) "EXPORT_FILE_NAME" title)
>          (org-md-export-to-markdown nil 1 nil)))))
>    nil nil))

Great, thanks!

Best,
Ista
>
>
> The when macro is like an if macro, with no else body.
>
> John
>
> -----------------------------------
> John Kitchin
> Associate Professor
> Doherty Hall A207F
> Department of Chemical Engineering
> Carnegie Mellon University
> Pittsburgh, PA 15213
> 412-268-7803
> http://kitchingroup.cheme.cmu.edu
>
>
>
> On Sun, Jan 5, 2014 at 2:49 PM, Ista Zahn <istazahn@gmail.com> wrote:
>>
>> On Sun, Jan 5, 2014 at 8:40 AM, John Kitchin <jkitchin@andrew.cmu.edu>
>> wrote:
>> > Try this:
>> >
>> >
>> > (org-map-entries
>> >              (lambda ()
>> >                (let ((level (nth 1 (org-heading-components)))
>> >                      (title (nth 4 (org-heading-components))))
>> >                  (if (= level 1)
>> >                      (org-entry-put (point) ":EXPORT_FILE_NAME:"
>> > title))))
>> >  nil nil)
>> >
>> > It seems to do what you want.
>>
>> Dear John,
>>
>> Thank you thank you! Using your code as I template I managed to write
>> a function that does what I wanted:
>>
>> (defun my-exp-headings-to-markdown ()
>>   "Export each top-level heading to markdown."
>>   (interactive)
>>   (org-map-entries
>>    (lambda ()
>>      (let ((level (nth 1 (org-heading-components)))
>>   (title (nth 4 (org-heading-components))))
>>        (if (= level 1)
>>   (org-entry-put (point) "EXPORT_FILE_NAME" title))
>>        (if (= level 1)
>>   (org-md-export-to-markdown nil 1 nil))))
>>    nil nil))
>>
>> Note that I had to remove the ":" from the second argument to
>> "org-entry-put" to get it working properly on my system. Not sure if
>> that was a bug in your original example or not.
>>
>> Best,
>> Ista
>>
>> >
>> > John
>> >
>> > -----------------------------------
>> > John Kitchin
>> > Associate Professor
>> > Doherty Hall A207F
>> > Department of Chemical Engineering
>> > Carnegie Mellon University
>> > Pittsburgh, PA 15213
>> > 412-268-7803
>> > http://kitchingroup.cheme.cmu.edu
>> >
>> >
>> >
>> > On Sat, Jan 4, 2014 at 7:36 PM, Ista Zahn <istazahn@gmail.com> wrote:
>> >>
>> >> On Sat, Jan 4, 2014 at 6:41 PM, Alan L Tyree <alantyree@gmail.com>
>> >> wrote:
>> >> > On 05/01/14 09:45, Charles Millar wrote:
>> >> >>
>> >> >> Ista and all,
>> >> >>
>> >> >> On 1/4/2014 5:29 PM, Ista Zahn wrote:
>> >> >>>
>> >> >>> Hi all,
>> >> >>>
>> >> >>> I'm looking for a way to export each top-level heading to a
>> >> >>> separate
>> >> >>> markdown file. Ideally I would like to have the exported files
>> >> >>> named
>> >> >>> according to the heading. For example I would like this org file
>> >> >>>
>> >> >>> -----------------------------------
>> >> >>> * Section one
>> >> >>> Section one text
>> >> >>> * Section two
>> >> >>> ** Section two a
>> >> >>> Section two text
>> >> >>> * Section three
>> >> >>> Section three text
>> >> >>> -----------------------------------
>> >> >>>
>> >> >>> To generate three files:
>> >> >>>
>> >> >>> --- Section one.md ---
>> >> >>> Section one text
>> >> >>>
>> >> >>> -----------------------------------
>> >> >>>
>> >> >>> --- Section two.md---
>> >> >>> ## Section two a
>> >> >>>
>> >> >>> Section two text
>> >> >>>
>> >> >>> -----------------------------------
>> >> >>>
>> >> >>> --- Section three.md -
>> >> >>> # Section three
>> >> >>>
>> >> >>> Section three text
>> >> >>>
>> >> >>> -----------------------------------
>> >> >>>
>> >> >>> I suspect that the publishing framework might support this, but
>> >> >>> I've
>> >> >>> thus far avoided it because it looks pretty complicated to set up.
>> >> >>> Before I dive in I'd like to know if the publishing framework is
>> >> >>> the
>> >> >>> correct place to look for this functionality or if there is an
>> >> >>> easier
>> >> >>> way to do it.
>> >> >>>
>> >> >>>
>> >> >>
>> >> >> I have a similar question regarding LaTeX export. How to export a
>> >> >> heading
>> >> >> (any heading, regardless of level) within a file to heading.tex
>> >> >> instead
>> >> >> of
>> >> >> file.tex? So far the only solution I have cobbled together is to C-x
>> >> >> C-f
>> >> >> 'file.tex" and then C-x C-w "heading.tex" .  I then typeset
>> >> >> heading.tex
>> >> >> using TeXworks. Perhaps I should note that my exported heading is
>> >> >> tagged so
>> >> >> that the heading is ignored.
>> >> >>
>> >> >> Charlie Millar
>> >> >>
>> >> >> ---
>> >> >> This email is free from viruses and malware because avast! Antivirus
>> >> >> protection is active.
>> >> >> http://www.avast.com
>> >> >>
>> >> >>
>> >> >>
>> >> > Use properties to set the export file name -- example:
>> >> >   :PROPERTIES:
>> >> >   :EXPORT_TITLE: Internet banking fraud
>> >> >   :EXPORT_FILE_NAME: internet-fraud
>> >> >   :EXPORT_AUTHOR: Alan L Tyree
>> >> >   :Citation: (2011) 22 JBFLP 214
>> >> >   :EXPORT_OPTIONS: num:nil toc:nil
>> >> >   :END:
>> >>
>> >> Thanks, gets me half the way there. Setting properties as you
>> >> described and exporting each sub-tree works properly. Now how can I do
>> >> this for all the top-level headings in a file?
>> >>
>> >> Best,
>> >> Ista
>> >>
>> >> >
>> >> > If I understood your question properly.
>> >> >
>> >> > Cheers,
>> >> > Alan
>> >> >
>> >> >
>> >> >
>> >> > --
>> >> > Alan L Tyree                    http://www2.austlii.edu.au/~alan
>> >> > Tel:  04 2748 6206              sip:typhoon@iptel.org
>> >> >
>> >> >
>> >>
>> >
>
>

  reply	other threads:[~2014-01-06  0:56 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2014-01-04 22:29 Export each top level heading to separate file Ista Zahn
2014-01-04 22:45 ` Charles Millar
2014-01-04 23:41   ` Alan L Tyree
2014-01-05  0:36     ` Ista Zahn
2014-01-05  2:44       ` Alan L Tyree
2014-01-05 13:40       ` John Kitchin
2014-01-05 19:49         ` Ista Zahn
2014-01-05 21:56           ` John Kitchin
2014-01-06  0:55             ` Ista Zahn [this message]
2014-01-05 18:34     ` Charles Millar
  -- strict thread matches above, loose matches on Subject: below --
2014-01-06  1:51 Marvin Doyley

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to='CA+vqiLGCuW4ZtMkSS7Opd8fxcFYYjCp4ufoQMZesYtP=CJ1m-Q@mail.gmail.com' \
    --to=istazahn@gmail.com \
    --cc=alantyree@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    --cc=jkitchin@andrew.cmu.edu \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).