From 04f13f148e8915ca06a7332c086398ab56a92c21 Mon Sep 17 00:00:00 2001 From: Steph Enders Date: Thu, 30 Mar 2023 10:55:50 -0400 Subject: Improve .emacs default setup - allow theme toggle --- .emacs | 31 +++++++++++++++++++++++++------ 1 file changed, 25 insertions(+), 6 deletions(-) diff --git a/.emacs b/.emacs index 109ae8b..0b7324d 100644 --- a/.emacs +++ b/.emacs @@ -3,11 +3,11 @@ ;; 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. - '(custom-safe-themes - '("58c996beb973f7e988ee4fd21c367b7a5bbdb0622ddfbbd112672a7b4e3d3b81" default)) - '(package-selected-packages '(elpher moe-theme org visual-fill-column)) '(custom-enabled-themes '(moe-dark)) - '(initial-buffer-choice t)) + '(custom-safe-themes + '("a68624bd5c4bec879ee59cd3039531b6229766a8b8ed0e79eef2642f14dbda32" "58c996beb973f7e988ee4fd21c367b7a5bbdb0622ddfbbd112672a7b4e3d3b81" default)) + '(initial-buffer-choice t) + '(package-selected-packages '(elpher moe-theme org visual-fill-column))) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. @@ -15,6 +15,7 @@ ;; If there is more than one, they won't work right. ) + ;; Setup modes ;;; remember layout ;;(desktop-save-mode 1) @@ -43,9 +44,27 @@ (setq backup-directory-alist '(("." . "~/.emacs.d/backups/"))) (setq sentence-end-double-space nil) +;; follow symlinks +(setq vc-follow-symlinks nil) + ;; Custom mode prefixes ;;; set gemini to markdown mode for now (add-to-list 'auto-mode-alist '("\\.gmi\\'" . markdown-mode)) -(when (file-exists-p "~/.emacs.d/pc_local_init.el") - (load "~/.emacs.d/pc_local_init.el")) +;; theme customization +(require 'moe-theme) +(setq moe-theme-mode-line-color 'cyan) +(moe-dark) +(defun use-light-theme () "Set theme to light" + (interactive) + (moe-light)) +(defun use-dark-theme () "Set theme to dark" + (interactive) + (moe-dark)) + +(global-set-key "\C-cl" 'use-light-theme) +(global-set-key "\C-cd" 'use-dark-theme) + +;; Always last +;;(when (file-exists-p "~/.emacs.d/pc_local_init.el") +;; (load "~/.emacs.d/pc_local_init.el"))` -- cgit v1.2.3-54-g00ecf