mirrors/org-cv
1
0
Fork 1
mirror of https://gitlab.com/Titan-C/org-cv.git synced 2024-11-14 18:48:30 +00:00
Code Issues Projects Releases Packages Wiki Activity

organizing headline logic

Browse source
This commit is contained in:
Óscar Nájera 2018-03-23 23:06:31 +01:00
parent ca364bca8a
commit c61aed42af
1 changed files with 7 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
ox-cv.el
View file

@ -178,12 +178,10 @@ as a communication channel."
(environment (let ((env (org-element-property :CV_ENV headline)))
(or (org-string-nw-p env) "block"))))
(concat (format "%s %s %s %s" level tags frame-level environment)
;; is a cv entry
"jumping"
(and (equal environment "cventry")
(org-cv-cventry headline contents info))
"ahead\n\n"
))))
(cond
;; is a cv entry
((equal environment "cventry")
(org-cv-cventry headline contents info))
(t (concat (format "%s %s %s %s %s\n" level tags frame-level environment
contents)
))))))