From 58bc6620b4a9f958d1792e772ca6279bfff3892e Mon Sep 17 00:00:00 2001 From: Chris Cochrun Date: Tue, 24 Aug 2021 10:52:59 -0500 Subject: [PATCH] fixing some ui stuff --- README.org | 32 ++++++++++++++++++++++++------ init.el | 58 +++++++++++++++++++++++++++++++++++++++++++----------- 2 files changed, 72 insertions(+), 18 deletions(-) diff --git a/README.org b/README.org index 17937a99..2cea1a6b 100644 --- a/README.org +++ b/README.org @@ -103,17 +103,17 @@ 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 on Wayland compositors" (if (string-search "wayland" x-display-name) - (set-frame-parameter (selected-frame) 'alpha '(100 . 100)) + ((set-frame-parameter (selected-frame) 'alpha '(100 . 100)) (set-frame-parameter (selected-frame) 'undecorated t) (add-to-list 'default-frame-alist '(undecorated . t)) - (add-to-list 'default-frame-alist '(alpha . (100 . 100))))) + (add-to-list 'default-frame-alist '(alpha . (100 . 100))) + (add-to-list 'initial-frame-alist '(alpha . (100 . 100)))))) (if (daemonp) (add-hook 'after-make-frame-functions (lambda (frame) (with-selected-frame frame - (chris/set-font-faces) - (chris/set-transparency))) + (chris/set-font-faces))) (chris/set-font-faces))) #+end_src @@ -1127,6 +1127,7 @@ Part of this config includes some special capture templates for my work as a you "/home/chris/org/ministry_team.org" "/home/chris/org/todo/todo.org" "/home/chris/org/newsletter.org" + "/home/chris/org/archive.org" "/home/chris/org/nvtfc_social_media.org" "/home/chris/org/lessons/") org-id-method 'ts) @@ -1166,7 +1167,7 @@ Part of this config includes some special capture templates for my work as a you (setq org-agenda-window-setup 'other-frame) - (defun chris/org-agenda-awesome () + (defun chris/org-agenda () "create a window in AwesomeWM that houses my org-agenda" (interactive) (org-agenda-list)) @@ -1668,6 +1669,25 @@ Let's add org-msg to write emails in org-mode (cfw:ical-create-source "Outlook" "https://outlook.office365.com/owa/calendar/62a0d491bec4430e825822afd2fd1c01@tfcconnection.org/9acc5bc27ca24ce7a900c57284959f9d8242340735661296952/S-1-8-2197686000-2519837503-3687200543-3873966527/reachcalendar.ics" "Yellow") ; Outlook Calendar ))) + (custom-set-faces + '(cfw:face-title ((t (:weight bold :height 2.0 :inherit fixed-pitch)))) + '(cfw:face-header ((t (:slant italic :weight bold)))) + '(cfw:face-sunday ((t :weight bold))) + '(cfw:face-saturday ((t :weight bold))) + '(cfw:face-holiday ((t :weight bold))) + ;; '(cfw:face-grid ((t :foreground "DarkGrey"))) + ;; '(cfw:face-default-content ((t :foreground "#bfebbf"))) + ;; '(cfw:face-periods ((t :foreground "cyan"))) + '(cfw:face-day-title ((t :background nil))) + '(cfw:face-default-day ((t :weight bold :inherit cfw:face-day-title))) + '(cfw:face-annotation ((t :inherit cfw:face-day-title))) + '(cfw:face-disable ((t :inherit cfw:face-day-title))) + '(cfw:face-today-title ((t :weight bold))) + '(cfw:face-today ((t :weight bold))) + ;; '(cfw:face-select ((t :background "#2f2f2f"))) + '(cfw:face-toolbar ((t :foreground "Steelblue4" :background "Steelblue4"))) + '(cfw:face-toolbar-button-off ((t :weight bold))) + '(cfw:face-toolbar-button-on ((t :weight bold)))) :general (chris/leader-keys :states 'normal @@ -2135,7 +2155,7 @@ Let's also use an automatic garbage collector while idle to make better input. :config (setq gcmh-idle-delay 5 gcmh-high-cons-threshold (* 128 1024 1024) ; 128mb - gcmh-verbose t)) + gcmh-verbose nil)) #+end_src ** Logging diff --git a/init.el b/init.el index dea6e963..5c40da25 100644 --- a/init.el +++ b/init.el @@ -39,19 +39,18 @@ (defun chris/set-transparency () "Set the frame to be transparent on Wayland compositors" (if (string-search "wayland" x-display-name) - (set-frame-parameter (selected-frame) 'alpha '(100 . 100)) + ((set-frame-parameter (selected-frame) 'alpha '(100 . 100)) (set-frame-parameter (selected-frame) 'undecorated t) (add-to-list 'default-frame-alist '(undecorated . t)) - (add-to-list 'default-frame-alist '(alpha . (100 . 100))))) + (add-to-list 'default-frame-alist '(alpha . (100 . 100))) + (add-to-list 'initial-frame-alist '(alpha . (100 . 100)))))) (if (daemonp) (add-hook 'after-make-frame-functions (lambda (frame) (with-selected-frame frame - (chris/set-font-faces) - (chris/set-transparency))) - (chris/set-font-faces)) - (chris/set-transparency)) + (chris/set-font-faces))) + (chris/set-font-faces))) (setq display-line-numbers-type 'relative) (global-display-line-numbers-mode +1) @@ -343,10 +342,10 @@ vertically." (use-package marginalia :bind (:map minibuffer-local-map - ("C-M-a" . marginalia-cycle) - ;; :map embark-general-map - ;; ("A" . marginalia-cycle) - ) + ("C-M-a" . marginalia-cycle) + ;; :map embark-general-map + ;; ("A" . marginalia-cycle) + ) ;; The :init configuration is always executed (Not lazy!) :init @@ -731,6 +730,7 @@ vertically." "/home/chris/org/ministry_team.org" "/home/chris/org/todo/todo.org" "/home/chris/org/newsletter.org" + "/home/chris/org/archive.org" "/home/chris/org/nvtfc_social_media.org" "/home/chris/org/lessons/") org-id-method 'ts) @@ -770,7 +770,7 @@ vertically." (setq org-agenda-window-setup 'other-frame) - (defun chris/org-agenda-awesome () + (defun chris/org-agenda () "create a window in AwesomeWM that houses my org-agenda" (interactive) (org-agenda-list)) @@ -1224,6 +1224,25 @@ If on a: (cfw:ical-create-source "Outlook" "https://outlook.office365.com/owa/calendar/62a0d491bec4430e825822afd2fd1c01@tfcconnection.org/9acc5bc27ca24ce7a900c57284959f9d8242340735661296952/S-1-8-2197686000-2519837503-3687200543-3873966527/reachcalendar.ics" "Yellow") ; Outlook Calendar ))) + (custom-set-faces + '(cfw:face-title ((t (:weight bold :height 2.0 :inherit fixed-pitch)))) + '(cfw:face-header ((t (:slant italic :weight bold)))) + '(cfw:face-sunday ((t :weight bold))) + '(cfw:face-saturday ((t :weight bold))) + '(cfw:face-holiday ((t :weight bold))) + ;; '(cfw:face-grid ((t :foreground "DarkGrey"))) + ;; '(cfw:face-default-content ((t :foreground "#bfebbf"))) + ;; '(cfw:face-periods ((t :foreground "cyan"))) + '(cfw:face-day-title ((t :background nil))) + '(cfw:face-default-day ((t :weight bold :inherit cfw:face-day-title))) + '(cfw:face-annotation ((t :inherit cfw:face-day-title))) + '(cfw:face-disable ((t :inherit cfw:face-day-title))) + '(cfw:face-today-title ((t :weight bold))) + '(cfw:face-today ((t :weight bold))) + ;; '(cfw:face-select ((t :background "#2f2f2f"))) + '(cfw:face-toolbar ((t :foreground "Steelblue4" :background "Steelblue4"))) + '(cfw:face-toolbar-button-off ((t :weight bold))) + '(cfw:face-toolbar-button-on ((t :weight bold)))) :general (chris/leader-keys :states 'normal @@ -1615,6 +1634,21 @@ interfere with the default `bongo-playlist-buffer'." :config (setq gcmh-idle-delay 5 gcmh-high-cons-threshold (* 128 1024 1024) ; 128mb - gcmh-verbose t)) + 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. + '(org-agenda-files + '("/home/chris/org/todo/inbox.org" "/home/chris/org/todo/notes.org" "/home/chris/org/repetition.org" "/home/chris/org/tfc_plans.org" "/home/chris/org/ministry_team.org" "/home/chris/org/todo/todo.org" "/home/chris/org/newsletter.org" "/home/chris/org/archive.org" "/home/chris/org/nvtfc_social_media.org" "/home/chris/org/lessons/last_night_2021.org" "/home/chris/org/lessons/lesson_10_saul_to_paul.org" "/home/chris/org/lessons/lesson_11_peter_with_the_gentiles.org" "/home/chris/org/lessons/lesson_12_james_peter_herod.org" "/home/chris/org/lessons/lesson_13_overview_of_missions_and_prayer_stations.org" "/home/chris/org/lessons/lesson_13_overview_of_missions_prayer_stations.org" "/home/chris/org/lessons/lesson_14_jerusalem_council.org" "/home/chris/org/lessons/lesson_15_singing_praising_and_repentant_jailers.org" "/home/chris/org/lessons/lesson_16_dismantling_idols.org" "/home/chris/org/lessons/lesson_17_gospel_of_paul_s_3rd_mission.org" "/home/chris/org/lessons/lesson_18_paul_and_the_shipwreck.org" "/home/chris/org/lessons/lesson_19_paul_s_journey_to_rome.org" "/home/chris/org/lessons/lesson_1_context_2020_21.org" "/home/chris/org/lessons/lesson_20_wrap_up.org" "/home/chris/org/lessons/lesson_4_fellowship_of_believers_2020_21.org" "/home/chris/org/lessons/lesson_6_peter_and_john_3_4.org" "/home/chris/org/lessons/lesson_7_persecuted_church_2020_21.org" "/home/chris/org/lessons/lesson_9_phillip_and_the_eunuch.org")) + '(pdf-misc-print-program "/usr/bin/lpr" t) + '(pdf-misc-print-program-args '("-o media=Letter" "-o fitplot") t)) +(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. + )