From 828227b7cdf312d07993e7a0bf793cef3ac10d1e Mon Sep 17 00:00:00 2001 From: Chris Cochrun Date: Tue, 5 Jul 2022 10:13:20 -0500 Subject: [PATCH] updating org looks --- README.org | 14 +++++++++++--- init.el | 30 +++++++++++++++++++++++++++--- recentf | 2 +- 3 files changed, 39 insertions(+), 7 deletions(-) diff --git a/README.org b/README.org index 731bfb2a..08b4ce39 100644 --- a/README.org +++ b/README.org @@ -115,9 +115,9 @@ In order to have this config work on both my desktop with regular joe-schmoe mon (defun chris/set-transparency () "Set the frame to be transparent but not the text" - (set-frame-parameter (selected-frame) 'alpha-background 85) - (add-to-list 'default-frame-alist '(alpha-background . 85)) - (add-to-list 'initial-frame-alist '(alpha-background . 85))) + (set-frame-parameter (selected-frame) 'alpha-background 100) + (add-to-list 'default-frame-alist '(alpha-background . 100)) + (add-to-list 'initial-frame-alist '(alpha-background . 100))) (if (daemonp) (add-hook 'after-make-frame-functions @@ -535,6 +535,14 @@ Let's start by creating a self contained function of what I'd like started on ev org-verbatim)) (set-face-attribute `,face nil :inherit 'fixed-pitch)) + (dolist (face + '((org-level-1 1.4 ultra-bold) + (org-level-2 1.3 extra-bold) + (org-level-3 1.2 bold) + (org-level-4 1.1 semi-bold) + (org-level-5 1.0 normal))) + (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face))) + (set-face-attribute 'org-block-end-line nil :inherit 'org-block-begin-line) (set-face-attribute 'org-quote nil :background "#242631" :inherit 'fixed-pitch)) diff --git a/init.el b/init.el index 48988e8c..3c8ae5c6 100644 --- a/init.el +++ b/init.el @@ -39,9 +39,9 @@ (defun chris/set-transparency () "Set the frame to be transparent but not the text" - (set-frame-parameter (selected-frame) 'alpha-background 85) - (add-to-list 'default-frame-alist '(alpha-background . 85)) - (add-to-list 'initial-frame-alist '(alpha-background . 85))) + (set-frame-parameter (selected-frame) 'alpha-background 100) + (add-to-list 'default-frame-alist '(alpha-background . 100)) + (add-to-list 'initial-frame-alist '(alpha-background . 100))) (if (daemonp) (add-hook 'after-make-frame-functions @@ -333,6 +333,14 @@ org-verbatim)) (set-face-attribute `,face nil :inherit 'fixed-pitch)) + (dolist (face + '((org-level-1 1.4 ultra-bold) + (org-level-2 1.3 extra-bold) + (org-level-3 1.2 bold) + (org-level-4 1.1 semi-bold) + (org-level-5 1.0 normal))) + (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face))) + (set-face-attribute 'org-block-end-line nil :inherit 'org-block-begin-line) (set-face-attribute 'org-quote nil :background "#242631" :inherit 'fixed-pitch)) @@ -2252,3 +2260,19 @@ interfere with the default `bongo-playlist-buffer'." gcmh-verbose nil)) (setq warning-suppress-types '((comp))) +(custom-set-variables + ;; custom-set-variables was added by Custom. + ;; If you edit it by hand, you could mess it up, so be careful. + ;; Your init file should contain only one such instance. + ;; If there is more than one, they won't work right. + '(pdf-misc-print-program "/usr/bin/lpr") + '(pdf-misc-print-program-args '("-o media=Letter" "-o fitplot")) + '(safe-local-variable-values + '((projectile-project-run-cmd . "./build/bin/presenter") + (projectile-project-compilation-cmd . "cmake -DCMAKE_EXPORT_COMPILE_COMMANDS=1 -B build/ . && make --dir build/")))) +(custom-set-faces + ;; custom-set-faces was added by Custom. + ;; If you edit it by hand, you could mess it up, so be careful. + ;; Your init file should contain only one such instance. + ;; If there is more than one, they won't work right. + '(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))) diff --git a/recentf b/recentf index ae5f2b42..3a1ceb73 100644 --- a/recentf +++ b/recentf @@ -1,4 +1,4 @@ -;;; Automatically generated by ‘recentf’ on Sun Jun 26 07:01:28 2022. +;;; Automatically generated by ‘recentf’ on Sun Jul 3 06:45:20 2022. (setq recentf-list 'nil)