From 5eea6b491952ca0da91bab7954916c6b5f76f4f5 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Wed, 2 Feb 2022 18:28:39 -0600 Subject: meh --- init.el | 30 +++++++++++++++--------------- 1 file changed, 15 insertions(+), 15 deletions(-) (limited to 'init.el') diff --git a/init.el b/init.el index ef9a54c..e11aaef 100644 --- a/init.el +++ b/init.el @@ -62,8 +62,7 @@ (:hook #'+init-add-setup-to-imenu)) (setup (:require auth-source) - (:option auth-sources (list 'default ; secret-source - "secrets:default" + (:option auth-sources (list 'default (private/ "authinfo"))) (:with-mode authinfo-mode (:local-set truncate-lines t))) @@ -1201,19 +1200,12 @@ See also `crux-reopen-as-root-mode'." emms-mode-line-format "%s" emms-mode-line-mode-line-function ;#'emms-mode-line-icon-function (defun +emms-mode-line-truncate () - (let ((current-trunc (concat "[ " + (let ((current-trunc (concat "{" (+string-truncate (emms-mode-line-playlist-current) 24) - " ] "))) - (if emms-mode-line-icon-enabled-p - (concat " " - emms-mode-line-icon-before-format - (emms-propertize "🎵:" 'display - (emms-mode-line-icon-generate - emms-mode-line-icon-color)) - current-trunc) - current-trunc)))) + "} "))) + current-trunc))) (emms-mode-line-mode +1) (emms-playing-time-mode -1)) @@ -1415,7 +1407,10 @@ See also `crux-reopen-as-root-mode'." jabber-groupchat-buffer-format "xmpp:%n" jabber-chat-buffer-format "xmpp:%n" jabber-muc-private-buffer-format "xmpp:%n(%g)" - jabber-activity-show-p #'ignore) + jabber-activity-show-p #'ignore + jabber-muc-decorate-presence-patterns + '(("\\( enters the room ([^)]+)\\| has left the chatroom\\)$") + ("." . jabber-muc-presence-dim))) (dolist (mode '(jabber-chat-mode jabber-browse-mode jabber-roster-mode @@ -1426,6 +1421,10 @@ See also `crux-reopen-as-root-mode'." (advice-add 'jabber-activity-add :after #'+jabber-tracking-add) (advice-add 'jabber-activity-add-muc :after #'+jabber-tracking-add-muc)) +(setup (:straight (keepassxc-shim + :host github :repo "duckwork/keepassxc-shim.el")) + (keepassxc-shim-activate)) + (setup (:straight-when keychain-environment (executable-find "keychain")) (keychain-refresh-environment)) @@ -1462,8 +1461,9 @@ See also `crux-reopen-as-root-mode'." (setup (:straight macrostep) (:require macrostep) - (:bind-into (emacs-lisp-mode lisp-interaction-mode) - "C-c e" #'macrostep-expand)) + (dolist (m '(emacs-lisp-mode-map + lisp-interaction-mode-map)) + (define-key (symbol-value m) (kbd "C-c e") #'macrostep-expand))) (setup (:straight (magit :host github :repo "magit/magit"))) -- cgit 1.4.1-21-gabe81