oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Small changes

Browse Source
This commit is contained in:
Aryadev Chavali
2024-10-20 20:50:48 +01:00
parent 84a6aff3b2
commit 2bcb749157
4 changed files with 75 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
Emacs/.config/emacs/config.org
View File

@@ -15,7 +15,6 @@
Welcome to my Emacs configuration. You may be confused by the fact Welcome to my Emacs configuration. You may be confused by the fact
it's a readable document with prose; this file serves as both it's a readable document with prose; this file serves as both
documentation *and* code. Here's an example of some Emacs Lisp code: documentation *and* code. Here's an example of some Emacs Lisp code:
#+begin_src emacs-lisp #+begin_src emacs-lisp
;;; config.el --- Compiled configuration from config.org -*- lexical-binding: t; -*- ;;; config.el --- Compiled configuration from config.org -*- lexical-binding: t; -*-
@@ -43,10 +42,12 @@ documentation *and* code. Here's an example of some Emacs Lisp code:
So how does this work? [[file:elisp/literate.el][Literate]] is a So how does this work? [[file:elisp/literate.el][Literate]] is a
package that I designed myself which "compiles" my configuration and package that I designed myself which "compiles" my configuration and
links it all together. This document is compiled by collecting all links it all together. The literate package compiles this document
the Emacs Lisp blocks, concatenating them then writing it to by:
=config.el=, which is loaded as a standard Emacs Lisp file afterwards. + collecting all the Emacs Lisp blocks
So all the prose is ignored in the final document. + concatenating them
+ writing it to =config.el=,
Then, when starting Emacs, the =config.el= file is loaded.
This allows the document to act as both /source code/ and This allows the document to act as both /source code/ and
/documentation/ at once. Pretty cool, right? This style of coding is /documentation/ at once. Pretty cool, right? This style of coding is
@@ -91,7 +92,7 @@ Let's setup a few absolute essentials:
delete-by-moving-to-trash t delete-by-moving-to-trash t
use-file-dialog nil use-file-dialog nil
use-dialog-box nil use-dialog-box nil
warning-minimum-level :emergency) warning-minimum-level :error)
:config :config
(fset 'yes-or-no-p 'y-or-n-p) (fset 'yes-or-no-p 'y-or-n-p)
(global-auto-revert-mode) (global-auto-revert-mode)
@@ -101,9 +102,9 @@ Let's setup a few absolute essentials:
(_ 120)))) (_ 120))))
#+end_src #+end_src
* Custom functionality and libraries * Custom functionality and libraries
This is custom Lisp I've written to help me out throughout the This is custom Lisp that I've written or someone else has to help me
configuration. Note that because it's setup so early I can use it out throughout the configuration. Note that because it's setup so
throughout the file. early I can use it throughout the file.
** dash ** dash
Dash is an external library that provides a ton of Emacs Lisp Dash is an external library that provides a ton of Emacs Lisp
functions that make it a bit nicer to use. functions that make it a bit nicer to use.
@@ -443,6 +444,7 @@ set of examples on how to use general.
(buffer-leader (buffer-leader
"b" #'switch-to-buffer "b" #'switch-to-buffer
"r" #'rename-buffer
"d" #'kill-current-buffer "d" #'kill-current-buffer
"c" #'kill-buffer-and-window "c" #'kill-buffer-and-window
"K" #'kill-buffer "K" #'kill-buffer
@@ -478,8 +480,9 @@ Setup the evil package, with some opinionated settings:
Vim considering the "verb-object" model most motions follow, but Vim considering the "verb-object" model most motions follow, but
by default Vim doesn't have the ability to do so. But Emacs can, by default Vim doesn't have the ability to do so. But Emacs can,
hence I can set these up. hence I can set these up.
+ Allow the Evil cursor to traverse End of Lines like the Emacs cursor + Allow the Evil cursor to traverse EOLs like the Emacs cursor.
+ Do not move the cursor when exiting insert mode. + Do not move the cursor when exiting insert mode.
+ Respect visual lines, allowing movement through them.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package evil (use-package evil
:straight t :straight t
@@ -493,7 +496,9 @@ Setup the evil package, with some opinionated settings:
evil-want-abbrev-expand-on-insert-exit t evil-want-abbrev-expand-on-insert-exit t
evil-want-minibuffer t evil-want-minibuffer t
evil-want-keybinding nil evil-want-keybinding nil
evil-want-Y-yank-to-eol t) evil-want-Y-yank-to-eol t
evil-want-change-word-to-end t
evil-respect-visual-line-mode t)
:config :config
(evil-mode) (evil-mode)
:general :general
@@ -719,6 +724,10 @@ just setup some evil binds for company.
:straight t :straight t
:hook :hook
((prog-mode-hook eshell-mode-hook) . company-mode) ((prog-mode-hook eshell-mode-hook) . company-mode)
:init
(setq company-idle-delay 0.2
company-minimum-prefix-length 3
company-require-match nil)
:general :general
(imap (imap
:keymaps 'company-mode-map :keymaps 'company-mode-map

2
Emacs/.config/emacs/elisp/eshell-prompt.el
View File

@@ -27,7 +27,7 @@
(defvar +eshell-prompt/user-prompt "𝜆> " (defvar +eshell-prompt/user-prompt "𝜆> "
"Prompt for user to input.") "Prompt for user to input.")
(defvar +eshell-prompt/dir-colour "skyblue") (defvar +eshell-prompt/dir-colour "deepskyblue")
(defvar +eshell-prompt/success-colour "forestgreen") (defvar +eshell-prompt/success-colour "forestgreen")
(defvar +eshell-prompt/failure-colour "red") (defvar +eshell-prompt/failure-colour "red")

2
Emacs/.config/emacs/elisp/personal-light-theme.el
View File

@@ -99,7 +99,7 @@
'(whitespace-line ((t (:inherit default :background "#e3e3e3" :foreground "violet")))) '(whitespace-line ((t (:inherit default :background "#e3e3e3" :foreground "violet"))))
'(whitespace-space ((t (:inherit default :background "#e3e3e3" :foreground "blue")))) '(whitespace-space ((t (:inherit default :background "#e3e3e3" :foreground "blue"))))
'(whitespace-tab ((t (:inherit default :background "#e3e3e3" :foreground "grey20")))) '(whitespace-tab ((t (:inherit default :background "#e3e3e3" :foreground "grey20"))))
'(default ((t (:family "RecMonoDuotone Nerd Font Propo" :foundry "ADBO" '(default ((t (:family "JetBrains Mono" :foundry "ADBO"
:width normal :weight normal :slant normal :underline nil :width normal :weight normal :slant normal :underline nil
:overline nil :extend nil :strike-through nil :box nil :inverse-video nil :overline nil :extend nil :strike-through nil :box nil :inverse-video nil
:foreground "#2E3436" :background "#EDEDED" :stipple nil :inherit :foreground "#2E3436" :background "#EDEDED" :stipple nil :inherit

79
Emacs/.config/emacs/elisp/personal-solarized-theme.el
View File

@@ -21,24 +21,35 @@
'(evil-goggles-default-face ((t (:background "#004065")))) '(evil-goggles-default-face ((t (:background "#004065"))))
'(evil-mc-cursor-default-face ((t (:foreground "black" :background "white")))) '(evil-mc-cursor-default-face ((t (:foreground "black" :background "white"))))
'(evil-mc-region-face ((t (:extend t :background "grey50")))) '(evil-mc-region-face ((t (:extend t :background "grey50"))))
'(fill-column-indicator ((t (:inherit shadow :foreground "gray23" :background "gray23" :weight thin)))) '(fill-column-indicator ((t (:inherit shadow :foreground "gray23"
:background "gray23" :weight thin))))
'(fixed-pitch-serif ((t (:family "Noto Serif" :height 0.95))))
'(font-latex-bold-face ((t (:weight bold :foreground "#9eacac")))) '(font-latex-bold-face ((t (:weight bold :foreground "#9eacac"))))
'(font-latex-doctex-documentation-face ((t (:background unspecified)))) '(font-latex-doctex-documentation-face ((t (:background unspecified))))
'(font-latex-doctex-preprocessor-face ((t (:inherit (font-latex-doctex-documentation-face font-lock-builtin-face font-lock-preprocessor-face))))) '(font-latex-doctex-preprocessor-face ((t (:inherit (font-latex-doctex-documentation-face
font-lock-builtin-face
font-lock-preprocessor-face)))))
'(font-latex-italic-face ((t (:style italic :foreground "#9eacac")))) '(font-latex-italic-face ((t (:style italic :foreground "#9eacac"))))
'(font-latex-math-face ((t (:foreground "#7a7ed2")))) '(font-latex-math-face ((t (:foreground "#7a7ed2"))))
'(font-latex-sectioning-0-face ((t (:inherit font-latex-sectioning-5-face :height 1.1)))) '(font-latex-sectioning-0-face ((t (:inherit font-latex-sectioning-5-face
'(font-latex-sectioning-1-face ((t (:inherit font-latex-sectioning-5-face :height 1.1)))) :height 1.1))))
'(font-latex-sectioning-2-face ((t (:inherit font-latex-sectioning-5-face :height 1.1)))) '(font-latex-sectioning-1-face ((t (:inherit font-latex-sectioning-5-face
'(font-latex-sectioning-3-face ((t (:inherit font-latex-sectioning-5-face :height 1.1)))) :height 1.1))))
'(font-latex-sectioning-4-face ((t (:inherit font-latex-sectioning-5-face :height 1.1)))) '(font-latex-sectioning-2-face ((t (:inherit font-latex-sectioning-5-face
:height 1.1))))
'(font-latex-sectioning-3-face ((t (:inherit font-latex-sectioning-5-face
:height 1.1))))
'(font-latex-sectioning-4-face ((t (:inherit font-latex-sectioning-5-face
:height 1.1))))
'(font-latex-sectioning-5-face ((t (:foreground "#c49619" :weight bold)))) '(font-latex-sectioning-5-face ((t (:foreground "#c49619" :weight bold))))
'(font-latex-sedate-face ((t (:foreground "#9eacac")))) '(font-latex-sedate-face ((t (:foreground "#9eacac"))))
'(font-latex-slide-title-face ((t (:inherit (default font-lock-type-face) :weight bold :height 1.2)))) '(font-latex-slide-title-face ((t (:inherit (default font-lock-type-face)
:weight bold :height 1.2))))
'(font-latex-string-face ((t (:foreground "#3cafa5")))) '(font-latex-string-face ((t (:foreground "#3cafa5"))))
'(font-latex-subscript-face ((t (:height 0.8)))) '(font-latex-subscript-face ((t (:height 0.8))))
'(font-latex-superscript-face ((t (:height 0.8)))) '(font-latex-superscript-face ((t (:height 0.8))))
'(font-latex-verbatim-face ((t (:inherit fixed-pitch :foreground "#8d9fa1" :slant italic)))) '(font-latex-verbatim-face ((t (:inherit fixed-pitch-serif :foreground "#8d9fa1"
:slant italic))))
'(font-latex-warning-face ((t (:inherit bold :foreground "#db5823")))) '(font-latex-warning-face ((t (:inherit bold :foreground "#db5823"))))
'(font-lock-builtin-face ((t (:foreground "#8d9fa1" :weight bold :slant normal)))) '(font-lock-builtin-face ((t (:foreground "#8d9fa1" :weight bold :slant normal))))
'(font-lock-comment-delimiter-face ((t (:foreground "#62787f" :slant normal)))) '(font-lock-comment-delimiter-face ((t (:foreground "#62787f" :slant normal))))
@@ -53,23 +64,29 @@
'(font-lock-warning-face ((t (:inherit error :weight bold)))) '(font-lock-warning-face ((t (:inherit error :weight bold))))
'(fringe ((t (:inherit (default))))) '(fringe ((t (:inherit (default)))))
'(haskell-interactive-face-prompt ((t (:foreground "green")))) '(haskell-interactive-face-prompt ((t (:foreground "green"))))
'(header-line ((t (:box nil :foreground "grey90" :background "grey20" :inherit (mode-line))))) '(header-line ((t (:box nil :foreground "grey90" :background "grey20"
:inherit (mode-line)))))
'(highlight ((t (:extend t :background "#222233")))) '(highlight ((t (:extend t :background "#222233"))))
'(homoglyph ((t (:foreground "cyan")))) '(homoglyph ((t (:foreground "cyan"))))
'(Info-quoted ((t (:inherit fixed-pitch-serif :underline t :height 1.05)))) '(Info-quoted ((t (:inherit fixed-pitch-serif :underline t))))
'(isearch ((t (:foreground "brown4" :background "white")))) '(isearch ((t (:foreground "brown4" :background "white"))))
'(isearch-fail ((t (:background "red4")))) '(isearch-fail ((t (:background "red4"))))
'(lazy-highlight ((t (:background "paleturquoise4")))) '(lazy-highlight ((t (:background "paleturquoise4"))))
'(line-number ((t (:foreground "grey45" :background "grey1" :inherit (default))))) '(line-number ((t (:foreground "grey45" :background "grey1" :inherit (default)))))
'(line-number-current-line ((t (:foreground "white" :background "grey1" :inherit (default))))) '(line-number-current-line ((t (:foreground "white" :background "grey1"
'(link ((t (:underline (:color foreground-color :style line) :foreground "cyan1")))) :inherit (default)))))
'(link ((t (:underline (:color foreground-color :style line)
:foreground "cyan1"))))
'(link-visited ((t (:foreground "violet" :inherit (link))))) '(link-visited ((t (:foreground "violet" :inherit (link)))))
'(match ((t (:background "RoyalBlue3")))) '(match ((t (:background "RoyalBlue3"))))
'(minibuffer-prompt ((t (:foreground "cyan")))) '(minibuffer-prompt ((t (:foreground "cyan"))))
'(mode-line ((t (:box (:line-width 1 :color "white") :foreground "LightSkyBlue" :background "black" :inherit (default))))) '(mode-line ((t (:box (:line-width 1 :color "white") :foreground "LightSkyBlue"
:background "black" :inherit (default)))))
'(mode-line-buffer-id ((t (:weight bold)))) '(mode-line-buffer-id ((t (:weight bold))))
'(mode-line-emphasis ((t (:weight bold)))) '(mode-line-emphasis ((t (:weight bold))))
'(mode-line-inactive ((t (:box (:line-width 1 :color "grey10") :weight light :foreground "CadetBlue" :background "grey7" :inherit (default))))) '(mode-line-inactive ((t (:box (:line-width 1 :color "grey10") :weight light
:foreground "CadetBlue" :background "grey7"
:inherit (default)))))
'(next-error ((t (:inherit (region))))) '(next-error ((t (:inherit (region)))))
'(orderless-match-face-0 ((t (:weight bold :foreground "lime green")))) '(orderless-match-face-0 ((t (:weight bold :foreground "lime green"))))
'(orderless-match-face-1 ((t (:weight bold :foreground "light green")))) '(orderless-match-face-1 ((t (:weight bold :foreground "light green"))))
@@ -89,11 +106,13 @@
'(outline-7 ((t (:inherit default :foreground "#ec423a")))) '(outline-7 ((t (:inherit default :foreground "#ec423a"))))
'(outline-8 ((t (:inherit default :foreground "#3c98e0")))) '(outline-8 ((t (:inherit default :foreground "#3c98e0"))))
'(outline-minor-0 ((t (:extend t :weight bold :background "#01323d")))) '(outline-minor-0 ((t (:extend t :weight bold :background "#01323d"))))
'(outline-minor-1 ((t (:extend t :inherit (outline-minor-0 outline-1) :background "#1e9d310d32a3")))) '(outline-minor-1 ((t (:extend t :inherit (outline-minor-0 outline-1)
:background "#1e9d310d32a3"))))
'(pdf-isearch-batch ((t (:foreground "black" :background "white")))) '(pdf-isearch-batch ((t (:foreground "black" :background "white"))))
'(pretty-mode-symbol-face ((t (:foreground "#c49619" :weight normal)))) '(pretty-mode-symbol-face ((t (:foreground "#c49619" :weight normal))))
'(query-replace ((t (:inherit (isearch))))) '(query-replace ((t (:inherit (isearch)))))
'(rainbow-delimiters-base-error-face ((t (:extend t :foreground "white" :background "red1")))) '(rainbow-delimiters-base-error-face ((t (:extend t :foreground "white"
:background "red1"))))
'(rainbow-delimiters-depth-1-face ((t (:extend t :foreground "red")))) '(rainbow-delimiters-depth-1-face ((t (:extend t :foreground "red"))))
'(rainbow-delimiters-depth-2-face ((t (:extend t :foreground "darkorange")))) '(rainbow-delimiters-depth-2-face ((t (:extend t :foreground "darkorange"))))
'(rainbow-delimiters-depth-3-face ((t (:extend t :foreground "yellow")))) '(rainbow-delimiters-depth-3-face ((t (:extend t :foreground "yellow"))))
@@ -101,26 +120,34 @@
'(rainbow-delimiters-depth-5-face ((t (:extend t :foreground "DeepSkyBlue")))) '(rainbow-delimiters-depth-5-face ((t (:extend t :foreground "DeepSkyBlue"))))
'(rainbow-delimiters-depth-6-face ((t (:extend t :foreground "purple")))) '(rainbow-delimiters-depth-6-face ((t (:extend t :foreground "purple"))))
'(rainbow-delimiters-depth-7-face ((t (:extend t :foreground "violet")))) '(rainbow-delimiters-depth-7-face ((t (:extend t :foreground "violet"))))
'(rainbow-delimiters-mismatched-face ((t (:extend t :foreground "white" :background "red4")))) '(rainbow-delimiters-mismatched-face ((t (:extend t :foreground "white"
'(rainbow-delimiters-unmatched-face ((t (:extend t :foreground "white" :background "red3")))) :background "red4"))))
'(rainbow-delimiters-unmatched-face ((t (:extend t :foreground "white"
:background "red3"))))
'(region ((t (:extend t :background "grey25")))) '(region ((t (:extend t :background "grey25"))))
'(secondary-selection ((t (:extend t :background "SkyBlue4")))) '(secondary-selection ((t (:extend t :background "SkyBlue4"))))
'(shadow ((t (:foreground "grey70")))) '(shadow ((t (:foreground "grey70"))))
'(show-paren-match ((t (:foreground unspecified :foreground "#55ec55" :weight bold)))) '(show-paren-match ((t (:foreground unspecified :foreground "#55ec55"
'(show-paren-mismatch ((t (:foreground "#01323d" :background "#ec1111" :weight bold)))) :weight bold))))
'(show-paren-mismatch ((t (:foreground "#01323d" :background "#ec1111"
:weight bold))))
'(tab-bar ((t (:background "black")))) '(tab-bar ((t (:background "black"))))
'(tab-bar-tab ((t (:background "grey5" :foreground "white" :box (:line-width 2 :color "grey19"))))) '(tab-bar-tab ((t (:background "grey5" :foreground "white"
:box (:line-width 2 :color "grey19")))))
'(tab-bar-tab-inactive ((t (:background "black" :foreground "DimGrey")))) '(tab-bar-tab-inactive ((t (:background "black" :foreground "DimGrey"))))
'(tooltip ((t (:foreground "black" :background "lightyellow" :inherit (variable-pitch))))) '(tooltip ((t (:foreground "black" :background "lightyellow"
:inherit (variable-pitch)))))
'(trailing-whitespace ((t (:background "red1")))) '(trailing-whitespace ((t (:background "red1"))))
'(whitespace-line ((t (:background "black" :foreground "violet")))) '(whitespace-line ((t (:background "black" :foreground "violet"))))
'(whitespace-space ((t (:background "#171717" :foreground "black")))) '(whitespace-space ((t (:background "#171717" :foreground "black"))))
'(whitespace-tab ((t (:background "#171717" :foreground "grey40")))) '(whitespace-tab ((t (:background "#171717" :foreground "grey40"))))
`(font-lock-constant-face ((t (:foreground ,personal-solarized-name-colour :weight bold)))) `(font-lock-constant-face ((t (:foreground ,personal-solarized-name-colour
`(font-lock-function-name-face ((t (:box nil :foreground ,personal-solarized-name-colour)))) :weight bold))))
`(font-lock-function-name-face ((t (:box nil
:foreground ,personal-solarized-name-colour))))
`(font-lock-preprocessor-face ((t (:foreground ,personal-solarized-name-colour)))) `(font-lock-preprocessor-face ((t (:foreground ,personal-solarized-name-colour))))
`(font-lock-variable-name-face ((t (:foreground ,personal-solarized-name-colour)))) `(font-lock-variable-name-face ((t (:foreground ,personal-solarized-name-colour))))
'(default ((t (:family "JetBrains Mono" :foundry "ADBO" :width normal '(default ((t (:family "Jetbrains Mono" :foundry "ADBO" :width normal
:weight normal :slant normal :underline nil :weight normal :slant normal :underline nil
:overline nil :extend nil :strike-through nil :overline nil :extend nil :strike-through nil
:box nil :inverse-video nil :box nil :inverse-video nil