pad modeline, change org latex headers

3 files changed, 64 insertions, 5 deletions

diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index 81b59f8..7c38cdc 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -81,7 +81,8 @@
 (use-package guix-emacs
   :demand t
   :config
-  (guix-emacs-autoload-packages))
+  (guix-emacs-autoload-packages)
+  (guix-prettify-global-mode 1))
 
 (require 'use-package-ensure)
 
diff --git a/.config/emacs/modules/bd--org.el b/.config/emacs/modules/bd--org.el
index b2ee2a5..6d3c862 100644
--- a/.config/emacs/modules/bd--org.el
+++ b/.config/emacs/modules/bd--org.el
@@ -37,10 +37,64 @@ each org file open."
      (python . t))))
 
 (use-package ox
+  :config
+  (add-to-list 'org-latex-packages-alist '("" "listings"))
   :custom
   (org-latex-toc-command "\\tableofcontents \\clearpage")
+  (org-latex-src-block-backend 'listings)
   (org-export-with-toc nil)
-  (org-export-preserve-breaks t))
+  (org-export-preserve-breaks t)
+  (org-latex-classes
+   '(("article"
+      "\\PassOptionsToPackage{svgnames}{xcolor}
+\\documentclass[11pt]{article}
+\\usepackage{listings}
+\\lstset{frame=single,aboveskip=1em,
+	framesep=.5em,backgroundcolor=\\color{AliceBlue},
+	rulecolor=\\color{Black},framerule=1pt}
+\\usepackage{xcolor}
+\\newcommand\\basicdefault[1]{\\scriptsize\\color{Black}\\fontfamily{pcr}\\selectfont}
+\\lstset{basicstyle=\\basicdefault{\\spaceskip1em}}
+\\lstset{keywordstyle=\\color{DarkGreen}\\bfseries,
+	 identifierstyle=\\color{DarkRed},
+	 commentstyle=\\color{DimGray}\\upshape,
+	 stringstyle=\\color{DarkBlue}\\upshape,
+	 emphstyle=\\color{Chocolate}\\upshape,
+	 showstringspaces=false,
+	 columns=fullflexible,
+	 keepspaces=true}
+\\usepackage{parskip}
+\\makeatletter
+\\renewcommand{\\maketitle}{%
+  \\begingroup\\parindent0pt
+  \\sffamily
+  \\begin{center}
+  \\Large{\\bfseries\\@title}\\par\\bigskip
+  \\large{\\bfseries\\@author}\\par\\medskip
+  \\normalsize\\@date\\par\\bigskip
+  \\end{center}
+  \\endgroup\\@afterindentfalse\\@afterheading}
+\\makeatother
+[DEFAULT-PACKAGES]
+\\hypersetup{linkcolor=Blue,urlcolor=DarkBlue,
+  citecolor=DarkRed,colorlinks=true}
+[PACKAGES]
+[EXTRA]"
+      ("\\section{%s}" . "\\section*{%s}")
+      ("\\subsection{%s}" . "\\subsection*{%s}")
+      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
+      ("\\paragraph{%s}" . "\\paragraph*{%s}")
+      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
+     ("report" "\\documentclass[11pt]{report}"
+      ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
+      ("\\section{%s}" . "\\section*{%s}")
+      ("\\subsection{%s}" . "\\subsection*{%s}")
+      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
+     ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%s}")
+      ("\\chapter{%s}" . "\\chapter*{%s}")
+      ("\\section{%s}" . "\\section*{%s}")
+      ("\\subsection{%s}" . "\\subsection*{%s}")
+      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")))))
 
 (use-package org-agenda
   :bind
diff --git a/.config/emacs/modules/bd--themes.el b/.config/emacs/modules/bd--themes.el
index 84924de..0812054 100644
--- a/.config/emacs/modules/bd--themes.el
+++ b/.config/emacs/modules/bd--themes.el
@@ -35,14 +35,18 @@ to.")
   :config
   ;; Disable all other themes to avoid awkward blending:
   (mapc #'disable-theme custom-enabled-themes)
+  (defun bd/pad-mode-line (&rest _)
+    "Inserts a large space around the modeline"
+    (modus-themes-with-colors
+      (custom-set-faces
+       `(mode-line ((,c :box (:line-width 7 :color ,bg-main))))
+       `(mode-line-inactive ((,c :box (:line-width 7 :color ,bg-main)))))))
+  (add-hook 'modus-themes-post-load-hook #'bd/pad-mode-line)
   :custom
   (modus-themes-mixed-fonts t)
   (modus-themes-italic-constructs t)
   (modus-themes-bold-constructs t)
   (modus-themes-variable-pitch-ui nil)
-  (modus-themes-markup '(background intense))
-  (modus-themes-region '(bg-only))
-  (modus-themes-syntax 'alt-syntax)
   (modus-themes-headings
    '((0 variable-pitch bold 1.5)
      (1 variable-pitch bold 1.4)