From f3c9869d0f45f6589ff7fa68636731285b9bfa13 Mon Sep 17 00:00:00 2001 From: qorg11 Date: Fri, 17 Jul 2020 03:53:29 +0200 Subject: [PATCH] new theme lmao --- config.org | 44 +++++++++++++++++++++----------------------- 1 file changed, 21 insertions(+), 23 deletions(-) diff --git a/config.org b/config.org index 4824ce1..f47ffe4 100644 --- a/config.org +++ b/config.org @@ -1,4 +1,4 @@ - +r #+AUTHOR: qorg11 #+TITLE: emacs config #+OPTIONS: toc:nil @@ -234,38 +234,35 @@ Including indent-buffer, which should not be called automatically on save." ** theme Emacs theme, among other things. #+BEGIN_SRC emacs-lisp - (use-package seti-theme + (use-package modus-vivendi-theme :ensure t :init - (load-theme 'seti t)) + (load-theme 'modus-vivendi t)) + (custom-set-faces '(org-block ((t (:background "#333"))))) ;; Org mode fixes -(if (display-graphic-p) - (let* ((variable-tuple - (cond ((x-list-fonts "IBM Plex Mono") '(:font "IBM Plex Mono")) - ((x-list-fonts "IBM Plex Mono") '(:font "IBM Plex Mono")) - ((x-list-fonts "IBM Plex Mono") '(:font "IBM Plex Mono")) - ((x-list-fonts "IBM Plex Mono") '(:font "IBM Plex Mono")) - ((x-family-fonts "IBM Plex Mono") '(:family "IBM Plex Mono")) - (nil (warn "Cannot find a Sans Serif Font. Install Source Sans Pro.")))) + (let* ((variable-tuple (cond ((x-list-fonts "Monospace") '(:font "Monospace")) + ((x-list-fonts "Lucida Grande") '(:font "Lucida Grande")) + ((x-list-fonts "Verdana") '(:font "Verdana")) + ((x-family-fonts "Sans Serif") '(:family "Sans Serif")) + (nil (warn "Cannot find a Sans Serif Font. Install Source Sans Pro.")))) (base-font-color (face-foreground 'default nil 'default)) (headline `(:inherit default :weight bold :foreground ,base-font-color))) - (custom-theme-set-faces - 'user - `(org-level-8 ((t (,@headline ,@variable-tuple)))) - `(org-level-7 ((t (,@headline ,@variable-tuple)))) - `(org-level-6 ((t (,@headline ,@variable-tuple)))) - `(org-level-5 ((t (,@headline ,@variable-tuple)))) - `(org-level-4 ((t (,@headline ,@variable-tuple :height 1)))) - `(org-level-3 ((t (,@headline ,@variable-tuple :height 1.1)))) - `(org-level-2 ((t (,@headline ,@variable-tuple :height 1.2)))) - `(org-level-1 ((t (,@headline ,@variable-tuple :height 1.4)))) - `(org-document-title ((t (,@headline ,@variable-tuple :height 2.0 :underline nil))))))) + (custom-theme-set-faces 'user + `(org-level-8 ((t (,@headline ,@variable-tuple)))) + `(org-level-7 ((t (,@headline ,@variable-tuple)))) + `(org-level-6 ((t (,@headline ,@variable-tuple)))) + `(org-level-5 ((t (,@headline ,@variable-tuple)))) + `(org-level-4 ((t (,@headline ,@variable-tuple :height 1)))) + `(org-level-3 ((t (,@headline ,@variable-tuple :height 1.1)))) + `(org-level-2 ((t (,@headline ,@variable-tuple :height 1.3)))) + `(org-level-1 ((t (,@headline ,@variable-tuple :height 1.5)))) + `(org-document-title ((t (,@headline ,@variable-tuple :height 1.5 :underline nil)))))) #+END_SRC ** AucTeX This basically opens zathura when compiling with auctex (C-c C-a) @@ -360,7 +357,7 @@ Including indent-buffer, which should not be called automatically on save." (defalias 'perl-mode 'cperl-mode) #+END_SRC -*** C +*** C* This use c-eldoc mode so it prints the function's prototype in the minibuffer. Which is very useful since Irony works when it wants to. @@ -371,6 +368,7 @@ Including indent-buffer, which should not be called automatically on save." (add-hook 'c-mode-hook 'c-turn-on-eldoc-mode)) #+END_SRC + ** Beacon mode 's cool #+BEGIN_SRC emacs-lisp