From eae0b9a789001708509adf8fbb2780a3a5c018ac Mon Sep 17 00:00:00 2001 From: Oscar Najera Date: Sun, 22 Oct 2023 00:53:19 +0200 Subject: [PATCH] Update alta & modern to use new date and host properties --- ox-altacv.el | 12 +++++------- ox-moderncv.el | 8 +++----- 2 files changed, 8 insertions(+), 12 deletions(-) diff --git a/ox-altacv.el b/ox-altacv.el index 959bc56..fd48db6 100644 --- a/ox-altacv.el +++ b/ox-altacv.el @@ -37,7 +37,7 @@ (add-to-list 'org-latex-classes '("altacv" "\\documentclass{altacv}" - ("\\section{%s}" . "\\section*{%s}") + ("\n\\section{%s}" . "\n\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")))) @@ -83,8 +83,7 @@ colorlinks=true, urlcolor=olive!50!black!30!green, } -" -) +") ;;;; Template ;; ;; Template used is similar to the one used in `latex' back-end, @@ -195,11 +194,10 @@ CONTENTS holds the contents of the headline. INFO is a plist used as a communication channel." (let* ((entry (org-cv-utils--parse-cventry headline info)) (divider (if (org-export-last-sibling-p headline info) "\n" "\\divider"))) - (format "\n\\cvevent{%s}{%s}{%s}{%s}%s\n%s" + (format "\n\\cvevent{%s}{%s}{%s}{%s}%s\n%s\n\n" (alist-get 'title entry) - (alist-get 'employer entry) - (org-cv-utils--format-time-window (alist-get 'from-date entry) - (alist-get 'to-date entry)) + (alist-get 'host entry) + (alist-get 'date entry) (alist-get 'location entry) contents divider))) ;;;; Headline diff --git a/ox-moderncv.el b/ox-moderncv.el index ffe7c0a..6c07b9d 100644 --- a/ox-moderncv.el +++ b/ox-moderncv.el @@ -185,12 +185,10 @@ CONTENTS holds the contents of the headline. INFO is a plist used as a communication channel." (let* ((entry (org-cv-utils--parse-cventry headline info)) (note (or (org-element-property :NOTE headline) ""))) - - (format "\\cventry{\\textbf{%s}}{%s}{%s}{%s}{%s}{%s}\n" - (org-cv-utils--format-time-window (alist-get 'from-date entry) - (alist-get 'to-date entry)) + (format "\\cventry{%s}{%s}{%s}{%s}{%s}{%s}\n" + (alist-get 'date entry) (alist-get 'title entry) - (alist-get 'employer entry) + (alist-get 'host entry) (alist-get 'location entry) note contents)))