sergiodj/org-cv
1
0
Fork 0
forked from mirrors/org-cv
Code Pull requests Activity

Allow tags or property value

Browse source 
fix awesome's environments
This commit is contained in:
Oscar Najera 2023-10-22 03:19:18 +02:00
parent 25fdcbfa01
commit d89628c2ed
8 changed files with 34 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
doc/content/post/basic_config.md
View file

@ -74,7 +74,6 @@ instead of a range. Both `FROM` and `TO` override `DATE`.
I write about awesome stuff I do.
** Other job :cventry:
:PROPERTIES:
:CV_ENV: cventry
:FROM: <2013-09-01>
:TO: <2014-08-07>
:LOCATION: my city, your country

2
genfiles.el
View file

@ -47,4 +47,6 @@
(export-latex 'altacv "altacv.org")
(export-latex 'moderncv "moderncv.org")
(export-latex 'awesomecv2 "awesomecv.org")
(export-latex 'awesomecv "awesomecv.org")
(export-latex 'awesomecv "awesome-letter.org")
(export-latex 'hugocv "hugocv.org")

6
ox-altacv.el
View file

@ -206,11 +206,11 @@ as a communication channel."
CONTENTS is the contents of the headline. INFO is a plist used
as a communication channel."
(unless (org-element-property :footnote-section-p headline)
(let ((environment (let ((env (org-element-property :CV_ENV headline)))
(or (org-string-nw-p env) "block"))))
(let ((environment (cons (org-element-property :CV_ENV headline)
(org-export-get-tags headline info))))
(cond
;; is a cv entry
((equal environment "cventry")
((member "cventry" environment)
(org-altacv--format-cventry headline contents info))
((org-export-with-backend 'latex headline contents info))))))

27
ox-awesomecv.el
View file

@ -340,25 +340,26 @@ as a communication channel."
CONTENTS is the contents of the headline. INFO is a plist used
as a communication channel."
(unless (org-element-property :footnote-section-p headline)
(let ((environment (let ((env (org-element-property :CV_ENV headline)))
(or (org-string-nw-p env) "block")))
(let ((environment (cons (org-element-property :CV_ENV headline)
(org-export-get-tags headline info)))
(pagebreak (org-string-nw-p (org-element-property :PAGEBREAK headline))))
(concat
(when pagebreak "\\clearpage\n")
(cond
;; is a cv entry or subentry
((member environment '("cventry"
"cvsubentry"
"cvemployer"
"cvschool"
"cvhonor"
"cvletter"
"cvletter_notitle"
"lettersection"
"letterheader"))
((seq-intersection environment '("cventry"
"cvsubentry"
"cvemployer"
"cvschool"
"cvhonor"
"cvletter"
"cvletter_notitle"
"lettersection"
"letterheader"))
(org-awesomecv--format-cventry headline contents info))
((member environment '("cventries" "cvhonors"))
(org-awesomecv--format-cvenvironment environment headline contents info))
((seq-intersection environment '("cventries" "cvhonors"))
(org-awesomecv--format-cvenvironment
(car (seq-intersection environment '("cventries" "cvhonors"))) headline contents info))
((org-export-with-backend 'latex headline contents info)))))))
;;;; Plain List, to intercept and transform "cvskills" lists

6
ox-awesomecv2.el
View file

@ -263,11 +263,13 @@ as a communication channel."
CONTENTS is the contents of the headline. INFO is a plist used
as a communication channel."
(unless (org-element-property :footnote-section-p headline)
(let ((environment (org-export-get-tags headline info)))
(let ((environment (cons (org-element-property :CV_ENV headline)
(org-export-get-tags headline info))))
(cond
;; is a cv entry
((seq-intersection environment '("cventries" "cvhonors"))
(org-cv-awesome2--format-cvenvironment (car environment) headline contents info))
(org-cv-awesome2--format-cvenvironment
(car (seq-intersection environment '("cventries" "cvhonors"))) headline contents info))
((seq-intersection environment '("cventry" "cvhonor"))
(org-cv-awesome2--entry headline contents info))
((org-export-with-backend 'latex headline contents info))))))

3
ox-hugocv.el
View file

@ -95,7 +95,8 @@ as a communication channel."
CONTENTS is the contents of the headline. INFO is a plist used
as a communication channel."
(unless (org-element-property :footnote-section-p headline)
(let ((environment (org-export-get-tags headline info)))
(let ((environment (cons (org-element-property :CV_ENV headline)
(org-export-get-tags headline info))))
(cond
((cl-find-if (lambda (s) (string-prefix-p "cv" s)) environment)
(org-hugocv--format-cventry headline contents info))

6
ox-moderncv.el
View file

@ -198,11 +198,11 @@ as a communication channel."
CONTENTS is the contents of the headline. INFO is a plist used
as a communication channel."
(unless (org-element-property :footnote-section-p headline)
(let ((environment (let ((env (org-element-property :CV_ENV headline)))
(or (org-string-nw-p env) "block"))))
(let ((environment (cons (org-element-property :CV_ENV headline)
(org-export-get-tags headline info))))
(cond
;; is a cv entry
((equal environment "cventry")
((member "cventry" environment)
(org-moderncv--format-cventry headline contents info))
((org-export-with-backend 'latex headline contents info))))))

7
readme.org
View file

@ -109,7 +109,6 @@ instead of a range. Both =FROM= and =TO= override =DATE=.
I write about awesome stuff I do.
,** Other job :cventry:
:PROPERTIES:
:CV_ENV: cventry
:FROM: <2013-09-01>
:TO: <2014-08-07>
:LOCATION: my city, your country
@ -455,6 +454,12 @@ exclude some tags during export.
#+END_SRC
You are responsible for styling your website.
# Next block is to generate exports
#+BEGIN_SRC org :exports none :tangle hugocv.org
#+include: basic_cv.org
#+include: sideactivities.org
#+include: workcontent.org
#+END_SRC
* License
:PROPERTIES: