fixing org latex classes for lessons

This commit is contained in:
Chris Cochrun 2023-09-13 09:52:40 -05:00
parent b01754f142
commit 47e16a9f60
2 changed files with 31 additions and 3 deletions

14
init.el
View file

@ -629,6 +629,12 @@ much faster. The hope is to also make this a faster version of imenu."
(org-agenda-list)))
(setq org-latex-packages-alist '(("margin=2cm" "geometry" nil)))
(add-to-list 'org-latex-classes '("lesson" "\\documentclass[12pt]{article}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}")))
:general
(chris/leader-keys
@ -2860,6 +2866,14 @@ targets."
(pdf-tools-install)
:config
(defun chris/print-multi-pdf ()
"Print the pdf in as many copies as needed"
(interactive)
(let* ((copies (completing-read "How many copies: " '("1" "2" "3")))
(pdf-misc-print-program-args `("-o media=Letter" ,(format "-# %s" copies) "-o fitplot" "-o sides=two-sided-long-edge")))
(message "printing %s copies." copies)
(pdf-misc-print-document (buffer-file-name))))
(custom-set-variables '(pdf-misc-print-program-executable "lpr")
'(pdf-misc-print-program-args (quote ("-o media=Letter" "-o fitplot" "-o sides=two-sided-long-edge"))))
(add-hook 'pdf-view-mode 'pdf-view-fit-page-to-window))