diff --git a/genfiles.el b/genfiles.el index 871faa8..952f2a9 100644 --- a/genfiles.el +++ b/genfiles.el @@ -1,36 +1,34 @@ -;; remember the current directory, find-file changes it -(defvar cwd default-directory) -(defvar workdir "/tmp/org-cv-exports/") -(find-file "/tmp/install-org.el") -(eval-buffer) +(defvar cv-cwd default-directory + "remember the current directory, find-file changes it") +(defvar cv-workdir "/tmp/org-cv-exports/") -(add-to-list 'load-path cwd) +(with-current-buffer (find-file-noselect "/tmp/install-org.el") + (emacs-lisp-byte-compile-and-load)) + +(add-to-list 'load-path cv-cwd) (require 'ox-moderncv) - (require 'ox-altacv) - (require 'ox-awesomecv) -(let ((readme (concat cwd "readme.org"))) - (find-file readme) - (make-directory workdir t) - (cd workdir) - (org-babel-tangle)) +(let ((readme (concat cv-cwd "readme.org"))) + (make-directory cv-workdir t) + (cd cv-workdir) + (with-current-buffer + (find-file-noselect readme) + (org-babel-tangle))) -(copy-file (concat cwd "doc/smile.png") workdir t) -(copy-directory "/root/texmf/tex/latex/Awesome-CV-master/fonts" workdir) +(copy-file (concat cv-cwd "doc/smile.png") cv-workdir t) (defun export-latex (backend file) - (let ((workfile (concat workdir file)) - (outfile (concat workdir file ".tex"))) + (let ((workfile (concat cv-workdir file)) + (outfile (concat cv-workdir file ".tex"))) (message (format "%s exists: %s" workfile (file-exists-p workfile))) (find-file workfile) (org-mode) (org-export-to-file backend outfile) (shell-command (format "lualatex %s" outfile) "*Messages*" "*Messages*") - (copy-file (concat file ".pdf") (concat cwd "/doc/static/" (concat file ".pdf")) t) - )) + (copy-file (concat file ".pdf") (concat cv-cwd "/doc/static/" (concat file ".pdf")) t))) (make-directory (concat cwd "/doc/static/") t) (export-latex 'altacv "altacv.org")