mirror of
https://gitlab.com/Titan-C/org-cv.git
synced 2024-12-22 12:39:06 +00:00
organizing headline logic
This commit is contained in:
parent
ca364bca8a
commit
c61aed42af
1 changed files with 7 additions and 9 deletions
16
ox-cv.el
16
ox-cv.el
|
@ -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)
|
||||
))))))
|
||||
|
|
Loading…
Reference in a new issue