summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--home/dots/.emacs53
-rw-r--r--home/dots/.emacs.d/BOGO-dark-theme.el109
2 files changed, 129 insertions, 33 deletions
diff --git a/home/dots/.emacs b/home/dots/.emacs
index 5ffe486..c651efb 100644
--- a/home/dots/.emacs
+++ b/home/dots/.emacs
@@ -49,7 +49,8 @@
(unless (package-installed-p package)
(package-install package)))
-(load-theme 'BOGO t)
+(load-theme 'BOGO-dark t)
+
(use-package exwm
:init
@@ -209,7 +210,7 @@
(use-package tab-bar
:custom
- (tab-bar-auto-width t)
+ (tab-bar-auto-width nil)
(tab-bar-close-button-show nil)
(tab-bar-format
'(tab-bar-format-tabs tab-bar-format-align-right tab-bar-format-global))
@@ -988,7 +989,7 @@
(org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id))
(use-package ol
- :after org-compat org-macs org-fold
+ :after (org-compat org-macs org-fold)
:bind
(("C-c l" . org-store-link)))
@@ -1067,7 +1068,6 @@
(advice-add 'org-agenda-quit :before (lambda ()
(interactive)
(org-save-all-org-buffers)
- (org-id-update-id-locations)
(sync-org)))
:bind
(("C-c a" . org-agenda)
@@ -1082,7 +1082,7 @@
:ensure nil)
(use-package appt
- :after org-agenda
+ :after (org-agenda dbus)
:demand t
;; Taken from https://igormelo.org/you_dont_need_org_alert.html
;; Enables notifications for org
@@ -1138,9 +1138,9 @@
(define-skeleton golang-if-nil-err
"If err != nil" nil
- > "if err != nil {" \n
- @ - \n
- -1 "}")
+ > "if err != nil {" \n
+ @ - \n
+ -1 "}")
(define-skeleton golang-new-struct
"New struct"
@@ -1151,12 +1151,13 @@
(define-skeleton golang-for-loop
"For loop"
- > "for _, v := range " - @ "{" \n
- \n
- -1 "}"))
+ > "for _, v := range " - @ "{" \n
+ \n
+ -1 "}"))
(use-package abbrev
- :after skeleton go-mode
+ :after (skeleton go-mode)
+ :diminish abbrev-mode
:init
(setq-default abbrev-mode t)
:config
@@ -1167,8 +1168,7 @@
(define-abbrev go-mode-abbrev-table "2st"
"" 'golang-new-struct)
(define-abbrev go-mode-abbrev-table "2fo"
- "" 'golang-for-loop)
- )
+ "" 'golang-for-loop))
(use-package flyspell
:diminish flyspell-mode
@@ -1183,8 +1183,6 @@
(use-package simple
:diminish visual-line-mode)
-
-
(use-package message
:custom
(message-expand-name-standard-ui t)
@@ -1194,9 +1192,7 @@
(message-citation-line-function 'message-insert-formatted-citation-line)
(message-mail-alias-type 'ecomplete)
(message-self-insert-commands nil)
- (message-send-mail-function 'sendmail-send-it)
- (message-kill-buffer-on-exit t)
- (message-sendmail-envelope-from 'header))
+ (message-kill-buffer-on-exit t))
(use-package sendmail
:defer t
@@ -1210,10 +1206,9 @@
(message-sendmail-f-is-evil t)
(message-sendmail-extra-arguments '("--read-envelope-from"))
(message-send-mail-function 'message-send-mail-with-sendmail)
+ (message-sendmail-envelope-from 'header)
(mail-user-agent 'message-user-agent))
-(use-package tempo)
-
(use-package rmail
:init
(defvar selected-rmail-account "")
@@ -1241,11 +1236,7 @@
(defun mail-work ()
(interactive)
(setq
- rmail-primary-inbox-list (list (concat "imaps://"
- "marc.coquand%40piva.earth"
- ":"
- piva-password
- "@imap.gmail.com:993"))
+ rmail-primary-inbox-list (list (concat "imaps://" "marc.coquand%40piva.earth" ":" piva-password "@imap.gmail.com:993"))
rmail-default-file "~/personal-db/mail/work/RMAIL"
rmail-remote-password-required nil
rmail-preserve-inbox nil
@@ -1264,11 +1255,7 @@
rmail-default-file "~/personal-db/mail/home/RMAIL"
rmail-remote-password-required nil
rmail-preserve-inbox nil
- rmail-primary-inbox-list (list (concat "imaps://"
- "marcc%40fastmail.fr"
- ":"
- fastmail-password
- "@imap.fastmail.com:993"))
+ rmail-primary-inbox-list (list (concat "imaps://" "marcc%40fastmail.fr" ":" fastmail-password "@imap.fastmail.com:993"))
rmail-secondary-file-regexp "~/personal-db/mail/home/archives/*.mbox"
rmail-output-file-alist '(("\\[PATCH.*\\]" . "patch.mbox")
("[rR]eceipt" . "receipt.mbox")
@@ -1295,7 +1282,7 @@
(tmm-prompt rmail-prompt-account)
(unless (eq selected-rmail-account prev)
;; First kill all RMAIL buffers to not leave any dangling
- (kill-matching-buffers "\\.mbox\\|RMAIL")))
+ (kill-matching-buffers "\\.mbox\\|^RMAIL")))
(rmail-no-check))
(defun rmail-open ()
@@ -1304,7 +1291,7 @@
(tmm-prompt rmail-prompt-account)
(unless (eq selected-rmail-account prev)
;; First kill all RMAIL buffers to not leave any dangling
- (kill-matching-buffers "\\.mbox\\|RMAIL")))
+ (kill-matching-buffers "\\.mbox\\|^RMAIL")))
(rmail))
:custom
(rmail-mime-prefer-html nil)
diff --git a/home/dots/.emacs.d/BOGO-dark-theme.el b/home/dots/.emacs.d/BOGO-dark-theme.el
new file mode 100644
index 0000000..ec41cf6
--- /dev/null
+++ b/home/dots/.emacs.d/BOGO-dark-theme.el
@@ -0,0 +1,109 @@
+(deftheme BOGO-dark
+ "Created 2024-11-27.")
+
+(custom-theme-set-faces
+ 'BOGO-dark
+ '(default ((t (:inherit nil :extend nil :stipple nil :background "#1d1d1d" :foreground "#fafaf8" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight regular :height 150 :width expanded :foundry "UKWN" :family "Iosevka SS13"))))
+ '(avy-lead-face ((t (:inherit fixed-pitch :background "dark red" :foreground "white"))))
+ '(avy-goto-char-timer-face ((t (:inherit fixed-pitch :background "gray50" :foreground "white"))))
+ '(calendar-weekend-header ((t (:inherit nil))))
+ '(comint-highlight-prompt ((t nil)))
+ '(corfu-default ((t (:background "#333333"))))
+ '(custom-group-subtitle ((t (:weight bold :inherit variable-pitch))))
+ '(diary ((t (:inherit fixed-pitch :foreground "red1"))))
+ '(eglot-highlight-symbol-face ((t (:weight bold))))
+ '(eglot-mode-line ((t (:weight regular))))
+ '(erc-timestamp-face ((t (:foreground "blue" :weight bold))))
+ '(eshell-prompt ((t (:weight bold))))
+ '(eww-valid-certificate ((t (:foreground "#fafaf8" :weight bold))))
+ '(fixed-pitch ((t (:family "Iosevka SS13 Extended"))))
+ '(isearch ((t (:foreground "white"))))
+ '(font-lock-builtin-face ((t (:weight regular))))
+ '(font-lock-comment-face ((t (:foreground "gray40"))))
+ '(font-lock-constant-face ((t (:slant italic))))
+ '(git-gutter:added ((t nil)))
+ '(git-gutter:modified ((t nil)))
+ '(git-gutter:deleted ((t (:foreground "red"))))
+ '(font-lock-function-name-face ((t nil)))
+ '(font-lock-keyword-face ((t nil)))
+ '(font-lock-string-face ((t (:foreground "#fffff8" :slant italic))))
+ '(font-lock-type-face ((t (:foreground "#fffff8"))))
+ '(magit-section-heading ((t (:weight bold))))
+ '(font-lock-variable-name-face ((t (:foreground "#fffff8"))))
+ '(fringe ((t nil)))
+ '(header-line ((t (:inherit default :foreground "grey20" :box (:line-width (12 . 12) :color "#1d1d1d") :underline (:color "#e0e0e0" :style line :position 0) :family "Iosevka Aile" :height 1.0))))
+ '(highlight ((t (:background "azure2"))))
+ '(info-header-xref ((t (:inherit info-xref :underline (:color "RoyalBlue3" :style line :position t)))))
+ '(info-menu-header ((t (:family "Iosevka aile" :weight bold))))
+ '(info-title-1 ((t (:family "Iosevka aile" :weight bold))))
+ '(info-node ((t (:foreground "brown" :box (:line-width (4 . 4) :color "#1d1d1d") :slant italic :weight bold))))
+ '(enwc-connected ((t (:foreground "dark green" :weight bold))))
+ '(link ((t (:foreground "#fffff8" :underline t))))
+ '(magit-branch-remote ((t (:foreground "royalblue"))))
+ '(markdown-inline-code-face ((t (:inherit markdown-code-face))))
+ '(markdown-pre-face ((t (:inherit markdown-code-face))))
+ '(ido-only-match ((t (:foreground "forest green" :weight bold))))
+ '(mastodon-display-name-face ((t (:inherit nil :weight bold))))
+ '(message-header-name ((t (:weight bold))))
+ '(message-header-subject ((t (:slant italic))))
+ '(message-separator ((t (:foreground "red"))))
+ '(message-cited-text-1 ((t (:foreground "gray50"))))
+ '(gnus-header-name ((t (:weight bold))))
+ '(gnus-header-content ((t nil)))
+ '(gnus-header-subject ((t (:slant italic))))
+ '(gnus-header-from ((t (:weight bold))))
+ '(minibuffer-prompt ((t nil)))
+ '(mode-line ((t (:background "#444444" :foreground "#fffff8" :box (:line-width (2 . 2) :style flat-button) :overline "#444444" :underline (:color "#444444" :style line :position t) :family "Iosevka Aile"))))
+ '(mode-line-emphasis ((t nil)))
+ '(mode-line-buffer-id ((t nil)))
+ '(magit-section-highlight ((t (:background "#333333"))))
+ '(magit-diff-file-heading-highlight ((t (:inherit magit-section-highlight))))
+ '(magit-diff-file-heading ((t nil)))
+ '(mode-line-inactive ((t (:inherit mode-line :background "#333333" :foreground "grey40" :overline "#333333" :underline (:color "#333333" :style line :position 0) :weight light))))
+ '(mu4e-header-highlight-face ((t (:inherit hl-line :extend t :weight bold))))
+ '(mu4e-header-key-face ((t (:weight bold))))
+ '(mu4e-highlight-face ((t (:inherit highlight))))
+ '(org-date ((t (:inherit fixed-pitch))))
+ '(org-agenda-structure ((t nil)))
+ '(org-upcoming-deadline ((t nil)))
+ '(org-imminent-deadline ((t (:foreground "DarkOrange3" :weight bold))))
+ '(org-agenda-date-today ((t (:weight bold))))
+ '(org-agenda-date-weekend ((t nil)))
+ '(help-key-binding ((t (:weight semibold :background "#444448" :box (:line-width (1 . -1) :color "#444448")))))
+ '(org-agenda-done ((t (:strike-through t :inherit org-time-grid :extend nil))))
+ '(org-agenda-structure-filter ((t (:slant italic))))
+ '(org-scheduled ((t nil)))
+ '(org-scheduled-today ((t nil)))
+ '(org-list-dt ((t (:weight bold))))
+ '(org-agenda-calendar-event ((t nil)))
+ '(org-drawer ((t nil)))
+ '(org-hide ((t (:foreground "#1D1D1D"))))
+ '(org-done ((t (:inherit (org-agenda-dimmed-todo-face fixed-pitch) :strike-through nil :extend nil :weight bold))))
+ '(org-todo ((t (:weight bold :inherit fixed-pitch))))
+ '(org-checkbox ((t (:weight bold :inherit fixed-pitch))))
+ '(org-priority ((t (:inherit fixed-pitch))))
+ '(org-headline-done ((t (:inherit org-agenda-dimmed-todo-face))))
+ '(org-level-1 ((t (:inherit outline-1 :extend nil :weight regular))))
+ '(org-tag ((t (:foreground "gray70"))))
+ '(org-time-grid ((t (:foreground "gray"))))
+ '(org-meta-line ((t (:foreground "gray" :inherit fixed-pitch))))
+ '(org-block-begin-line ((t :inherit org-tag)))
+ '(org-quote ((t (:inherit org-block :slant italic))))
+ '(outline-4 ((t (:inherit outline-2))))
+ '(tab-line ((t ( :weight semi-light :family "Iosevka Aile"))))
+ '(tab-line-highlight ((t (:weight semi-light :family "Iosevka Aile"))))
+ '(tab-line-tab-current ((t (:weight semi-light :family "Iosevka Aile"))))
+ '(tab-line-tab-inactive ((t (:weight semi-light :foreground "gray70" :family "Iosevka Aile"))))
+ '(tab-bar ((t (:weight semi-light :box nil :background "#333333" :family "iosevka Aile"))))
+ '(tab-bar-tab ((t (:inherit tab-bar :box (:line-width (8 . -1) :style flat-button :color "#1d1d1d") :background "#1d1d1d" :foreground "#fffff8"))))
+ '(tab-bar-tab-inactive ((t (:box (:line-width (20 . -1) :style flat-button :color "#333333") :background "#333333" :foreground "#999999" :weight semi-light ))))
+ '(tldr-code-block ((t (:background "cornsilk" :foreground "#fffff8"))))
+ '(tldr-description ((t nil)))
+ '(tldr-command-argument ((t (:background "cornsilk" :foreground "#fffff8"))))
+ '(tldr-command-itself ((t (:background "khaki" :foreground "#fffff8" :weight bold))))
+ '(tldr-introduction ((t (:foreground "#fffff8" :slant italic))))
+ '(tldr-title ((t (:inherit variable-pitch :foreground "#fffff8" :weight bold))))
+ '(variable-pitch ((t (:family "Iosevka Aile" :height 1.0))))
+ '(window-divider ((t (:foreground "gray20")))))
+
+(provide-theme 'BOGO-dark)