diff --git a/ox-hugocv.el b/ox-hugocv.el index 073c2b5..fa704cd 100644 --- a/ox-hugocv.el +++ b/ox-hugocv.el @@ -72,21 +72,22 @@ CONTENTS holds the contents of the headline. INFO is a plist used as a communication channel." (let ((from-date (org-element-property :FROM headline)) (to-date (org-element-property :TO headline)) + (loffset (string-to-number (plist-get info :hugo-level-offset))) ;"" -> 0, "0" -> 0, "1" -> 1, .. + (level (org-export-get-relative-level headline info)) (title (org-export-data (org-element-property :title headline) info)) (employer (org-element-property :EMPLOYER headline)) (location (or (org-element-property :LOCATION headline) ""))) - (format "\n
-

%s

-
+ (format "\n%s + + %s " - title + (concat (make-string (+ loffset level) ?#) " " title) employer location (concat (org-hugocv-timestamp-to-shortdate from-date)