Re: [O] org-list-to-subtree strange behaviour

2017-09-16 Thread Nicolas Goaziou
Hello,

Robert Klein  writes:

> I'm trying to use org-list-to-subtree in a publishing projects
> sitemap-function.
>
> However, the org-list-to-subtree function only returns the first entry.
>
> That is, when I run
>
> (org-list-to-subtree  l '(:istart "** "))
>
> after setting the variable l (see below, I didn't want the
> 120+ lines interrupting this text) , I get this result:
>
>
> "**   [[file: openbsd-pxe.org][OpenBSD deployment via PXE]]
>
> #+begin_article-info
> #+BEGIN_date
> 2017-09-10
> #+END_date
>
> #+BEGIN_tags
> OpenBSD, PXE, Installation, Deployment
> #+END_tags
>
> #+begin_article-info
>
> "
>
> where I expected all nine entries in the list.

This is because L is not a valid list. In particular, it contains two
consecutive blank lines, which breaks the list.

Regards,

-- 
Nicolas Goaziou



[O] org-list-to-subtree strange behaviour

2017-09-16 Thread Robert Klein
Hi,

I'm trying to use org-list-to-subtree in a publishing projects
sitemap-function.

However, the org-list-to-subtree function only returns the first entry.

That is, when I run

(org-list-to-subtree  l '(:istart "** "))

after setting the variable l (see below, I didn't want the
120+ lines interrupting this text) , I get this result:


"**   [[file: openbsd-pxe.org][OpenBSD deployment via PXE]]
#+begin_article-info
#+BEGIN_date
2017-09-10
#+END_date
#+BEGIN_tags
OpenBSD, PXE, Installation, Deployment
#+END_tags
#+begin_article-info

"

where I expected all nine entries in the list.


It works for simple lists, e.g.

  (setq l '(unordered
("alpha")
("beta")
("gamma")))

results in

"** alpha
** beta
** gamma"

which is about what I expect.

Any Ideas?


Thank you very much!

Best regards
Robert



(setq l
'(unordered ("
[[file: openbsd-pxe.org][OpenBSD deployment via PXE]]
#+begin_article-info
#+begin_date
2017-09-10
#+end_date
#+begin_tags
OpenBSD, PXE, Installation, Deployment
#+end_tags
#+begin_article-info


#+INCLUDE: \"openbsd-pxe.org::lead\"

[[file:openbsd-pxe.org]][Read more]]
") ("
[[file: dhcp-to-fixed-ip.org][Change from DHCP to fixed IP during
autoYaST]] #+begin_article-info
#+begin_date
2017-09-10
#+end_date
#+begin_tags
SUSE, autoYaST, DHCP, network configuration
#+end_tags
#+begin_article-info


#+INCLUDE: \"dhcp-to-fixed-ip.org::lead\"

[[file:dhcp-to-fixed-ip.org]][Read more]]
") ("
[[file: ksh93-getopts.org][Man-Page mit ksh93 getopts]]
#+begin_article-info
#+begin_date
2017-09-06
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"ksh93-getopts.org::lead\"

[[file:ksh93-getopts.org]][Read more]]
") ("
[[file: autoyast-group-ids.org][Assigning group IDs with autoYaST]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"autoyast-group-ids.org::lead\"

[[file:autoyast-group-ids.org]][Read more]]
") ("
[[file: derived-exporter.org][Deriving a Back-End]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"derived-exporter.org::lead\"

[[file:derived-exporter.org]][Read more]]
") ("
[[file: freebsd-pxe.org][FreeBSD deployment via PXE]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"freebsd-pxe.org::lead\"

[[file:freebsd-pxe.org]][Read more]]
") ("
[[file: htdig.org][ht://Dig]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"htdig.org::lead\"

[[file:htdig.org]][Read more]]
") ("
[[file: index.org][xyzzy.de — Robert's weblog]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"index.org::lead\"

[[file:index.org]][Read more]]
") ("
[[file: ox-blog-example.org][ox-blog example post]]
#+begin_article-info
#+begin_date
2017-06-03
#+end_date
#+begin_tags
nil
#+end_tags
#+begin_article-info


#+INCLUDE: \"ox-blog-example.org::lead\"

[[file:ox-blog-example.org]][Read more]]
")))