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

View file

@ -899,6 +899,12 @@ Part of this config includes some special capture templates for my work as a you
(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
@ -3909,6 +3915,9 @@ Using sly makes a lot better common-lisp interaction within emacs.
#+end_src
** PDF-Tools
:PROPERTIES:
:ID: 20230906T144438.725878
:END:
Let's use pdf-tools for a lot better interaction with pdfs.
#+begin_src emacs-lisp
(use-package pdf-tools
@ -3919,6 +3928,14 @@ Let's use pdf-tools for a lot better interaction with pdfs.
(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))
@ -3955,9 +3972,6 @@ Let's use pdf-tools for a lot better interaction with pdfs.
#+end_src
** EMPV
:PROPERTIES:
:ID: 20230905T060329.179745
:END:
With empv we can perhaps control mpv much more fine grainly and even search youtube videos easier through emacs. Let's set it up.
#+begin_src emacs-lisp
(use-package empv

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))