From 16f4e04fb5ca29d7a48a79277f394cec91362f19 Mon Sep 17 00:00:00 2001 From: Christian Cunningham Date: Wed, 26 Feb 2025 16:34:06 -0800 Subject: Colorize Add color to status bar Minor changes: Ignore url-like file names for pining alive Include files should be treated as assembly --- elchemy-user.el | 16 ++++++++++++---- 1 file changed, 12 insertions(+), 4 deletions(-) diff --git a/elchemy-user.el b/elchemy-user.el index 41f2376..cd78701 100644 --- a/elchemy-user.el +++ b/elchemy-user.el @@ -45,13 +45,17 @@ elchemy/schedule-lookahead 7) ;; Modeline -(setq-default mode-line-format `((:propertize " ♥ " face (:family ,elchemy/user/alt-font-name)) +(setq-default mode-line-format `((:propertize " ♥ " face (:family ,elchemy/user/alt-font-name :foreground "red")) (:propertize "PlayTime" face (:weight bold)) - (:propertize " ♦ " face (:family ,elchemy/user/alt-font-name)) + (:propertize " ♦ " face (:family ,elchemy/user/alt-font-name :foreground "red")) (:propertize "%b" face (:slant italic)) - (:propertize " ♣ " face (:family ,elchemy/user/alt-font-name)) + (:propertize " ♣ " face (:family ,elchemy/user/alt-font-name :foreground "black")) (:propertize (:eval mode-name) face (:foreground "red")) - (:propertize " ♠ " face (:family ,elchemy/user/alt-font-name)))) + (:propertize " ♠ " face (:family ,elchemy/user/alt-font-name :foreground "black")))) + +;; Don't treat url-like file names as urls and ping accidentally when emacs greps! +;; [https://old.reddit.com/r/emacs/comments/1gjlv1z/why_is_emacs_grep_command_pinging_external_servers/] +(setq ffap-machine-p-known 'reject) ;; Ignore Bell (setq ring-bell-function 'ignore) @@ -60,6 +64,9 @@ (setq python-shell-interpreter "~/.micromamba/envs/emacs-py/bin/ipython" python-shell-interpreter-args "--pylab") +;; Assembly +(add-to-list 'auto-mode-alist '("\\.inc\\'" . asm-mode)) + ;; Org Mode Options (org-babel-do-load-languages 'org-babel-load-languages @@ -111,6 +118,7 @@ (setq treesit-language-source-alist '((bash "https://github.com/tree-sitter/tree-sitter-bash") + (clojure "https://github.com/sogaiu/tree-sitter-clojure") (cmake "https://github.com/uyha/tree-sitter-cmake") (css "https://github.com/tree-sitter/tree-sitter-css") (elisp "https://github.com/Wilfred/tree-sitter-elisp") -- cgit v1.2.1