Need some help in customizing ox-texinfo

Need some help in customizing ox-texinfo

[Oleh Krehel]

Hello,

I'm exporting an Org-mode document to Texinfo currently, but I'm having
an inconvenience with production of @subsubheading items.

What I'm doing right now:

    #+BEGIN_TEXINFO
    @subsubheading <Title>
    #+END_TEXINFO
    <Content>

What I would like to have instead:

    * <Title>        :@subsubheading
    <Content>

And have it export to the same thing. I didn't find an easy way to do
it, since this requires embedding the content of a headline into the
parent headline. What I've got so far is adding this code to
`org-texinfo--normalize-headlines':

    (org-element-map tree 'headline
        (lambda (hl)
          (when (member "@subsubheading" (org-element-property :tags hl))
            (setcar (nthcdr (cl-position hl (org-element-property :parent hl))
                            (org-element-property :parent hl))
                    (cons `(paragraph
                            ()
                            ,(format
                              "@subsubheading %s"
                              (org-element-property
                               :raw-value hl)))
                          (org-element-contents hl)))))
        info)

It almost works, the only issue is that "@" is escaped later on and I
get "@@subsubheading" in the end. How can I fix that? Is there an easier
way to do this in general?

regards,
Oleh

Re: Need some help in customizing ox-texinfo

[Nicolas Goaziou]

Hello,

Oleh Krehel <ohwoeowho@gmail.com> writes:

> I'm exporting an Org-mode document to Texinfo currently, but I'm having
> an inconvenience with production of @subsubheading items.
>
> What I'm doing right now:
>
>     #+BEGIN_TEXINFO
>     @subsubheading <Title>
>     #+END_TEXINFO
>     <Content>
>
> What I would like to have instead:
>
>     * <Title>        :@subsubheading
>     <Content>
>
> And have it export to the same thing. I didn't find an easy way to do
> it, since this requires embedding the content of a headline into the
> parent headline. What I've got so far is adding this code to
> `org-texinfo--normalize-headlines':
>
>     (org-element-map tree 'headline
>         (lambda (hl)
>           (when (member "@subsubheading" (org-element-property :tags hl))
>             (setcar (nthcdr (cl-position hl (org-element-property :parent hl))
>                             (org-element-property :parent hl))
>                     (cons `(paragraph
>                             ()
>                             ,(format
>                               "@subsubheading %s"
>                               (org-element-property
>                                :raw-value hl)))
>                           (org-element-contents hl)))))
>         info)
>
> It almost works, the only issue is that "@" is escaped later on and I
> get "@@subsubheading" in the end. How can I fix that? Is there an easier
> way to do this in general?

I'm not sure to understand your use case, but couldn't you customize
`org-texinfo-classes'? In particular, see the last paragraph in its
docstring.


Regards,

-- 
Nicolas Goaziou