Fix and re-enable dashboard

Add some more fonts

Try to fix modeline fonts, still not quite working, rearranged config
to test this
This commit is contained in:
Evie Litherland-Smith 2023-11-01 08:37:30 +00:00
parent 0ee059a354
commit a9f798f051
10 changed files with 127 additions and 103 deletions

View file

@ -158,7 +158,18 @@
fira-mono fira-mono
fira-code fira-code
fira-code-symbols fira-code-symbols
(nerdfonts.override { fonts = [ "FiraCode" ]; }) (nerdfonts.override {
fonts = [
"FiraCode"
"FiraMono"
"DejaVuSansMono"
"Noto"
"ComicShannsMono"
"NerdFontsSymbolsOnly"
];
})
emacs-all-the-icons-fonts
weather-icons
noto-fonts noto-fonts
noto-fonts-cjk noto-fonts-cjk
noto-fonts-emoji noto-fonts-emoji

View file

@ -32,7 +32,14 @@
(setq user-full-name "Evie Litherland-Smith" (setq user-full-name "Evie Litherland-Smith"
user-mail-address "evie@xenia.me.uk") user-mail-address "evie@xenia.me.uk")
;; Set default coding system (especially for Windows)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
(require 'custom-ui-config)
(require 'custom-defaults-config) (require 'custom-defaults-config)
(require 'custom-email-config) (require 'custom-email-config)
(require 'custom-feed-config) (require 'custom-feed-config)
(require 'custom-ide-config) (require 'custom-ide-config)
@ -41,15 +48,9 @@
(require 'custom-org-config) (require 'custom-org-config)
(require 'custom-project-config) (require 'custom-project-config)
(require 'custom-social-config) (require 'custom-social-config)
(require 'custom-ui-config)
(require 'crafted-completion-config) (require 'crafted-completion-config)
(require 'crafted-ide-config) (require 'crafted-ide-config)
(require 'crafted-org-config) (require 'crafted-org-config)
(require 'crafted-workspaces-config) (require 'crafted-workspaces-config)
(require 'crafted-writing-config) (require 'crafted-writing-config)
;; Set default coding system (especially for Windows)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)

View file

@ -3,31 +3,16 @@
message-sendmail-f-is-evil t message-sendmail-f-is-evil t
message-sendmail-extra-arguments '("--read-envelope-from") message-sendmail-extra-arguments '("--read-envelope-from")
message-send-mail-function #'message-send-mail-with-sendmail message-send-mail-function #'message-send-mail-with-sendmail
message-kill-buffer-on-exit t) message-kill-buffer-on-exit t
mail-user-agent 'mu4e-user-agent
(when (require 'mu4e nil :noerror) read-mail-command 'mu4e
(keymap-set global-map "C-c m m" #'mu4e) mu4e-maildir "~/Mail"
(keymap-set global-map "C-c m u" #'mu4e-update-index)
(keymap-set global-map "C-c m c" #'mu4e-compose-new)
(when (require 'mu4e-alert nil :noerror)
(setq mu4e-alert-modeline-formatter 'mu4e-alert-default-mode-line-formatter)
(mu4e-alert-set-default-style 'libnotify)
(mu4e-alert-enable-notifications)
(mu4e-alert-enable-mode-line-display))
(setq mu4e-maildir "~/Mail"
mu4e-attachment-dir "~/Downloads" mu4e-attachment-dir "~/Downloads"
mu4e-get-mail-command "mbsync -a" mu4e-get-mail-command "mbsync -a"
mu4e-update-interval (* 5 60) ; Every 5 minutes mu4e-update-interval (* 5 60) ; Every 5 minutes
mu4e-sent-messages-behavior 'sent mu4e-sent-messages-behavior 'sent
mu4e-change-filenames-when-moving t mu4e-change-filenames-when-moving t
mu4e-context-policy 'pick-first mu4e-context-policy 'pick-first
sendmail-program (executable-find "msmtp")
send-mail-function #'smtpmail-send-it
message-sendmail-f-is-evil t
message-sendmail-extra-arguments '("--read-envelope-from")
message-send-mail-function #'message-send-mail-with-sendmail
mu4e-headers-thread-single-orphan-prefix '("─>" . "─▶") mu4e-headers-thread-single-orphan-prefix '("─>" . "─▶")
mu4e-headers-thread-orphan-prefix '("┬>" . "┬▶ ") mu4e-headers-thread-orphan-prefix '("┬>" . "┬▶ ")
mu4e-headers-thread-connection-prefix '("" . "") mu4e-headers-thread-connection-prefix '("" . "")
@ -43,14 +28,26 @@
mu4e-search-related-label '("R" . "󰌹 ") mu4e-search-related-label '("R" . "󰌹 ")
mu4e-search-skip-duplicates-label '("D" . "󰆑 ") mu4e-search-skip-duplicates-label '("D" . "󰆑 ")
mu4e-search-threaded-label'("T" . "󱇫 ") mu4e-search-threaded-label'("T" . "󱇫 ")
mu4e-alert-modeline-formatter 'mu4e-alert-default-mode-line-formatter
mu4e-headers-fields '((:human-date . 12) mu4e-headers-fields '((:human-date . 12)
(:flags . 6) (:flags . 6)
(:from-or-to . 25) (:from-or-to . 25)
(:subject)) (:subject))
mu4e-maildir-shortcuts '((:maildir "/Proton/Inbox/" :key ?p) mu4e-maildir-shortcuts '((:maildir "/Proton/Inbox/" :key ?p)
(:maildir "/iCloud/Inbox/" :key ?i) (:maildir "/iCloud/Inbox/" :key ?i)
(:maildir "/Outlook/Inbox/" :key ?o)) (:maildir "/Outlook/Inbox/" :key ?o)))
mu4e-contexts (list
(when (require 'mu4e nil :noerror)
(keymap-set global-map "C-c m m" #'mu4e)
(keymap-set global-map "C-c m u" #'mu4e-update-index)
(keymap-set global-map "C-c m c" #'mu4e-compose-new)
(when (require 'mu4e-alert nil :noerror)
(mu4e-alert-set-default-style 'libnotify)
(mu4e-alert-enable-notifications)
(mu4e-alert-enable-mode-line-display))
(setq mu4e-contexts (list
(make-mu4e-context (make-mu4e-context
:name "Proton" :name "Proton"
:match-func (lambda (msg) (when msg (string-prefix-p "/Proton" (mu4e-message-field msg :maildir)))) :match-func (lambda (msg) (when msg (string-prefix-p "/Proton" (mu4e-message-field msg :maildir))))

View file

@ -1,10 +1,13 @@
(when (require 'elfeed nil :noerror) (let ((elfeed-base-directory "~/.elfeed"))
(let ((elfeed-base-directory "~/.elfeed"))
(setq elfeed-db-directory (expand-file-name "db" elfeed-base-directory) (setq elfeed-db-directory (expand-file-name "db" elfeed-base-directory)
elfeed-enclosure-default-dir (expand-file-name "enclosures" elfeed-base-directory) elfeed-enclosure-default-dir (expand-file-name "enclosures" elfeed-base-directory)
rmh-elfeed-org-files (list (expand-file-name "feeds.org" elfeed-base-directory)))) rmh-elfeed-org-files (list (expand-file-name "feeds.org" elfeed-base-directory))))
(when (require 'elfeed nil :noerror)
(add-hook 'elfeed-search-mode-hook #'elfeed-update) (add-hook 'elfeed-search-mode-hook #'elfeed-update)
(when (require 'elfeed-org nil :noerror) (elfeed-org)) (when (require 'elfeed-org nil :noerror)
(when (require 'elfeed-tube nil :noerror) (elfeed-tube-setup))) (elfeed-org))
(when (require 'elfeed-tube nil :noerror)
(elfeed-tube-setup)))
(provide 'custom-feed-config) (provide 'custom-feed-config)

View file

@ -4,16 +4,16 @@
(when (require 'treesit-aut nil :noerror) (when (require 'treesit-aut nil :noerror)
(global-treesit-auto-mode +1)) (global-treesit-auto-mode +1))
(setq apheleia-remote-algorithm 'local)
(when (require 'apheleia nil :noerror) (when (require 'apheleia nil :noerror)
(setq apheleia-remote-algorithm 'local)
(keymap-set global-map "C-c c f" #'apheleia-format-buffer) (keymap-set global-map "C-c c f" #'apheleia-format-buffer)
(apheleia-global-mode +1)) (apheleia-global-mode +1))
(when (require 'eglot nil :noerror) (when (require 'eglot nil :noerror)
(eglot-ensure)) (eglot-ensure))
(setq direnv-always-show-summary nil)
(when (require 'direnv nil :noerror) (when (require 'direnv nil :noerror)
(setq direnv-always-show-summary nil)
(direnv-mode +1)) (direnv-mode +1))
(when (require 'yasnippet nil :noerror) (when (require 'yasnippet nil :noerror)

View file

@ -50,12 +50,12 @@
:emptry-lines 1) :emptry-lines 1)
)) ))
(when (require 'khalel nil :noerror) (setq khalel-import-org-file (expand-file-name "calendar.org" org-directory)
(setq khalel-import-org-file (expand-file-name "calendar.org" org-directory)
khalel-import-org-file-read-only nil khalel-import-org-file-read-only nil
khalel-import-org-file-confirm-overwrite nil khalel-import-org-file-confirm-overwrite nil
khalel-import-start-date "-30d" khalel-import-start-date "-30d"
khalel-import-end-date "+30d") khalel-import-end-date "+30d")
(when (require 'khalel nil :noerror)
(add-hook 'org-agenda-mode-hook #'khalel-import-events) (add-hook 'org-agenda-mode-hook #'khalel-import-events)
(khalel-add-capture-template "e")) (khalel-add-capture-template "e"))

View file

@ -6,7 +6,7 @@
(project-find-dir "Find directory") (project-find-dir "Find directory")
(project-eshell "Eshell"))) (project-eshell "Eshell")))
(when (require 'magit nil :noerror) (setq magit-clone-default-directory "~/Projects/")
(setq magit-clone-default-directory "~/Projects/")) (require 'magit nil :noerror)
(provide 'custom-project-config) (provide 'custom-project-config)

View file

@ -1,5 +1,5 @@
(when (require 'mastodon nil :noerror) (setq mastodon-instance-url "https://tech.lgbt"
(setq mastodon-instance-url "https://tech.lgbt" mastodon-active-user "Tux922")
mastodon-active-user "Tux922")) (require 'mastodon nil :noerror)
(provide 'custom-social-config) (provide 'custom-social-config)

View file

@ -25,27 +25,31 @@
(load-theme 'doom-tokyo-night t)) (load-theme 'doom-tokyo-night t))
;; Nerd-Icons modes ;; Nerd-Icons modes
(when (require 'nerd-icons-dired nil :noerror) (when (require 'nerd-icons)
(when (require 'nerd-icons-dired nil :noerror)
(add-hook 'dired-mode-hook #'nerd-icons-dired-mode)) (add-hook 'dired-mode-hook #'nerd-icons-dired-mode))
(when (require 'nerd-icons-ibuffer nil :noerror) (when (require 'nerd-icons-ibuffer nil :noerror)
(add-hook 'ibuffer-mode-hook #'nerd-icons-ibuffer-mode)) (add-hook 'ibuffer-mode-hook #'nerd-icons-ibuffer-mode))
(when (require 'nerd-icons-completion nil :noerror) (when (require 'nerd-icons-completion nil :noerror)
(nerd-icons-completion-mode) (nerd-icons-completion-mode)
(when (require 'marginalia nil :noerror) (when (require 'marginalia nil :noerror)
(add-hook 'marginalia-mode-hook #'nerd-icons-completion-marginalia-setup))) (add-hook 'marginalia-mode-hook #'nerd-icons-completion-marginalia-setup))))
;; Doom-Modeline ;; Doom-Modeline
(setq doom-modeline-icon t
doom-modeline-mu4e t
doom-modeline-modal nil
doom-modeline-modal-icon nil
doom-modeline-persp-name nil
doom-modeline-persp-icon nil)
(when (require 'doom-modeline nil :noerror) (when (require 'doom-modeline nil :noerror)
(setq doom-modeline-icon t
doom-modeline-mu4e t)
(display-battery-mode) (display-battery-mode)
(doom-modeline-mode +1)) (doom-modeline-mode +1))
;; Dashboard ;; Dashboard
(when (require 'dashboard nil :noerror) (setq initial-buffer-choice 'dashboard-open
(setq initial-buffer-choice 'dashboard-open
dashboard-icon-type 'nerd-icons dashboard-icon-type 'nerd-icons
dashboard-set-heading-icons t dashboard-set-heading-icons t
dashboard-set-file-icons t dashboard-set-file-icons t
@ -56,7 +60,12 @@
dashboard-projects-switch-function 'project-switch-project dashboard-projects-switch-function 'project-switch-project
dashboard-projects-show-base t dashboard-projects-show-base t
dashboard-recentf-show-base 'align dashboard-recentf-show-base 'align
dashboard-items '((projects . 5) (agenda . 5) (recents . 5)) dashboard-items '((projects . 5)
(agenda . 5)
(recents . 5))
dashboard-heading-icons '((projects . "nf-oct-rocket")
(agenda . "nf-oct-calendar")
(recents . "nf-oct-history"))
dashboard-banner-ascii (concat " .000000. \n" dashboard-banner-ascii (concat " .000000. \n"
" .0. .0. \n" " .0. .0. \n"
" .00. .00. \n" " .00. .00. \n"
@ -70,18 +79,20 @@
" HHHHHH HHHHHHHHH HHHHHHHH \n" " HHHHHH HHHHHHHHH HHHHHHHH \n"
" HHH HHHH HHHHHHHHH HHHH \n" " HHH HHHH HHHHHHHHH HHHH \n"
" HHH HHHHHH \n" " HHH HHHHHH \n"
" HHHHH HH \n"))) " HHHHH HH \n"))
(require 'dashboard nil :noerror)
;; Extra minor-modes ;; Extra minor-modes
(when (require 'which-key nil :noerror) (when (require 'which-key nil :noerror)
(which-key-mode +1)) (which-key-mode +1))
(when (require 'page-break nil :noerror) (when (require 'page-break-lines nil :noerror)
(global-page-break-lines-mode +1)) (global-page-break-lines-mode +1))
;; Weather in modeline ;; Weather in modeline
(setq display-wttr-format 1) (setq display-wttr-format 1)
(when (require 'display-wttr nil :noerror) (display-wttr-mode +1)) (when (require 'display-wttr nil :noerror)
(display-wttr-mode +1))
;;;; Help Buffers ;;;; Help Buffers

View file

@ -64,12 +64,13 @@
mastodon mastodon
# ui-packages # ui-packages
all-the-icons
nerd-icons nerd-icons
nerd-icons-completion nerd-icons-completion
nerd-icons-dired nerd-icons-dired
nerd-icons-ibuffer nerd-icons-ibuffer
page-break-lines page-break-lines
# dashboard dashboard
doom-modeline doom-modeline
helpful helpful
which-key which-key