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))) (org-agenda-list)))
(setq org-latex-packages-alist '(("margin=2cm" "geometry" nil))) (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 :general
(chris/leader-keys (chris/leader-keys
@ -3909,6 +3915,9 @@ Using sly makes a lot better common-lisp interaction within emacs.
#+end_src #+end_src
** PDF-Tools ** PDF-Tools
:PROPERTIES:
:ID: 20230906T144438.725878
:END:
Let's use pdf-tools for a lot better interaction with pdfs. Let's use pdf-tools for a lot better interaction with pdfs.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package pdf-tools (use-package pdf-tools
@ -3919,6 +3928,14 @@ Let's use pdf-tools for a lot better interaction with pdfs.
(pdf-tools-install) (pdf-tools-install)
:config :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") (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")))) '(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)) (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 #+end_src
** EMPV ** 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. 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 #+begin_src emacs-lisp
(use-package empv (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))) (org-agenda-list)))
(setq org-latex-packages-alist '(("margin=2cm" "geometry" nil))) (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 :general
(chris/leader-keys (chris/leader-keys
@ -2860,6 +2866,14 @@ targets."
(pdf-tools-install) (pdf-tools-install)
:config :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") (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")))) '(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)) (add-hook 'pdf-view-mode 'pdf-view-fit-page-to-window))