mirror of
https://gitlab.com/Titan-C/org-cv.git
synced 2024-11-14 18:48:30 +00:00
Complete exporting of document
After a lot of trial and error and still not understanding clearly what is going on. I somehow see the loop of how the document is exported and thus how I just need to take care of the part that concerns my cventry.
This commit is contained in:
parent
c61aed42af
commit
c7fe0e363e
1 changed files with 2 additions and 7 deletions
9
ox-cv.el
9
ox-cv.el
|
@ -172,16 +172,11 @@ holding export options."
|
||||||
CONTENTS is the contents of the headline. INFO is a plist used
|
CONTENTS is the contents of the headline. INFO is a plist used
|
||||||
as a communication channel."
|
as a communication channel."
|
||||||
(unless (org-element-property :footnote-section-p headline)
|
(unless (org-element-property :footnote-section-p headline)
|
||||||
(let ((level (org-export-get-relative-level headline info))
|
(let ((tags (org-export-get-tags headline info))
|
||||||
(frame-level (org-beamer--frame-level headline info))
|
|
||||||
(tags (org-export-get-tags headline info))
|
|
||||||
|
|
||||||
(environment (let ((env (org-element-property :CV_ENV headline)))
|
(environment (let ((env (org-element-property :CV_ENV headline)))
|
||||||
(or (org-string-nw-p env) "block"))))
|
(or (org-string-nw-p env) "block"))))
|
||||||
(cond
|
(cond
|
||||||
;; is a cv entry
|
;; is a cv entry
|
||||||
((equal environment "cventry")
|
((equal environment "cventry")
|
||||||
(org-cv-cventry headline contents info))
|
(org-cv-cventry headline contents info))
|
||||||
(t (concat (format "%s %s %s %s %s\n" level tags frame-level environment
|
((org-export-with-backend 'latex headline contents info))))))
|
||||||
contents)
|
|
||||||
))))))
|
|
||||||
|
|
Loading…
Reference in a new issue