From c84e3e306a14cd6739a4668412368a03f34b1ac6 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Mon, 2 Jan 2023 23:36:42 +0000 Subject: Add commentary to the init file --- init.el | 32 ++++++++++++++++++++++---------- ymh-emacs/ymh-common.el | 9 +++++---- 2 files changed, 27 insertions(+), 14 deletions(-) diff --git a/init.el b/init.el index 97c06fc..a2110db 100644 --- a/init.el +++ b/init.el @@ -1,19 +1,27 @@ -;; -*- lexical-binding: t; -*- +;;; init.el --- Main configuration file -*- lexical-binding: t; -*- + +;; Author: Yann Herklotz + +;;; Commentary: + +;; This is the main configuration for my emacs configuration. + +;;; Code: (setq user-full-name "Yann Herklotz") (setq user-mail-address "yann@yannherklotz.com") (setq gc-cons-threshold (* 1024 1024 1024)) -(global-set-key (kbd "M-u") #'upcase-dwim) -(global-set-key (kbd "M-l") #'downcase-dwim) -(global-set-key (kbd "M-c") #'capitalize-dwim) +(global-set-key (kbd "M-u") #'upcase-dwim) +(global-set-key (kbd "M-l") #'downcase-dwim) +(global-set-key (kbd "M-c") #'capitalize-dwim) (global-set-key (kbd "C-c z") #'quick-calc) -(global-set-key (kbd "") #'revert-buffer) -(global-set-key (kbd "C-.") #'other-window) -(global-set-key (kbd "C-,") #'ymh/prev-window) -(global-set-key (kbd "C-\\") #'undo-only) -(global-set-key (kbd "M-SPC") (lambda () (interactive) (insert " "))) +(global-set-key (kbd "") #'revert-buffer) +(global-set-key (kbd "C-.") #'other-window) +(global-set-key (kbd "C-,") #'ymh/prev-window) +(global-set-key (kbd "C-\\") #'undo-only) +(global-set-key (kbd "M-SPC") (lambda () (interactive) (insert " "))) (global-set-key (kbd "C-") #'tab-bar-switch-to-recent-tab) (global-set-key (kbd "C-c l") #'org-store-link) @@ -144,7 +152,7 @@ (dolist (c '(overwrite-mode narrow-to-region narrow-to-page upcase-region downcase-region)) (put c 'disabled nil)) - (set-face-attribute 'default nil :font "IBM Plex Mono SmBld-10") + (set-face-attribute 'default nil :font "IBM Plex Mono SmBld-14") (setq auto-mode-alist (append @@ -886,3 +894,7 @@ https://yannherklotz.com")) (unless (file-exists-p custom-file) (with-temp-buffer (write-file custom-file))) (load custom-file) + +(provide 'init) + +;;; init.el ends here diff --git a/ymh-emacs/ymh-common.el b/ymh-emacs/ymh-common.el index 887060e..660a4a4 100644 --- a/ymh-emacs/ymh-common.el +++ b/ymh-emacs/ymh-common.el @@ -33,10 +33,11 @@ "Load theme, taking current system APPEARANCE into consideration." (mapc #'disable-theme custom-enabled-themes) (pcase appearance - ;;('light (load-theme 'modus-operandi t)) - ;;('dark (load-theme 'modus-vivendi t)) - ('light (load-theme 'ef-spring t)) - ('dark (load-theme 'ef-dark t)))) + ('light (load-theme 'modus-operandi-tinted t)) + ('dark (load-theme 'modus-vivendi-tinted t)) + ;;('light (load-theme 'ef-spring t)) + ;;('dark (load-theme 'ef-dark t)) + )) (defadvice load-theme (before theme-dont-propagate activate) -- cgit