summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el30
1 files changed, 15 insertions, 15 deletions
diff --git a/init.el b/init.el index ef9a54c..e11aaef 100644 --- a/init.el +++ b/init.el
@@ -62,8 +62,7 @@
62 (:hook #'+init-add-setup-to-imenu)) 62 (:hook #'+init-add-setup-to-imenu))
63 63
64(setup (:require auth-source) 64(setup (:require auth-source)
65 (:option auth-sources (list 'default ; secret-source 65 (:option auth-sources (list 'default
66 "secrets:default"
67 (private/ "authinfo"))) 66 (private/ "authinfo")))
68 (:with-mode authinfo-mode 67 (:with-mode authinfo-mode
69 (:local-set truncate-lines t))) 68 (:local-set truncate-lines t)))
@@ -1201,19 +1200,12 @@ See also `crux-reopen-as-root-mode'."
1201 emms-mode-line-format "%s" 1200 emms-mode-line-format "%s"
1202 emms-mode-line-mode-line-function ;#'emms-mode-line-icon-function 1201 emms-mode-line-mode-line-function ;#'emms-mode-line-icon-function
1203 (defun +emms-mode-line-truncate () 1202 (defun +emms-mode-line-truncate ()
1204 (let ((current-trunc (concat "[ " 1203 (let ((current-trunc (concat "{"
1205 (+string-truncate 1204 (+string-truncate
1206 (emms-mode-line-playlist-current) 1205 (emms-mode-line-playlist-current)
1207 24) 1206 24)
1208 " ] "))) 1207 "} ")))
1209 (if emms-mode-line-icon-enabled-p 1208 current-trunc)))
1210 (concat " "
1211 emms-mode-line-icon-before-format
1212 (emms-propertize "🎵:" 'display
1213 (emms-mode-line-icon-generate
1214 emms-mode-line-icon-color))
1215 current-trunc)
1216 current-trunc))))
1217 (emms-mode-line-mode +1) 1209 (emms-mode-line-mode +1)
1218 (emms-playing-time-mode -1)) 1210 (emms-playing-time-mode -1))
1219 1211
@@ -1415,7 +1407,10 @@ See also `crux-reopen-as-root-mode'."
1415 jabber-groupchat-buffer-format "xmpp:%n" 1407 jabber-groupchat-buffer-format "xmpp:%n"
1416 jabber-chat-buffer-format "xmpp:%n" 1408 jabber-chat-buffer-format "xmpp:%n"
1417 jabber-muc-private-buffer-format "xmpp:%n(%g)" 1409 jabber-muc-private-buffer-format "xmpp:%n(%g)"
1418 jabber-activity-show-p #'ignore) 1410 jabber-activity-show-p #'ignore
1411 jabber-muc-decorate-presence-patterns
1412 '(("\\( enters the room ([^)]+)\\| has left the chatroom\\)$")
1413 ("." . jabber-muc-presence-dim)))
1419 (dolist (mode '(jabber-chat-mode 1414 (dolist (mode '(jabber-chat-mode
1420 jabber-browse-mode 1415 jabber-browse-mode
1421 jabber-roster-mode 1416 jabber-roster-mode
@@ -1426,6 +1421,10 @@ See also `crux-reopen-as-root-mode'."
1426 (advice-add 'jabber-activity-add :after #'+jabber-tracking-add) 1421 (advice-add 'jabber-activity-add :after #'+jabber-tracking-add)
1427 (advice-add 'jabber-activity-add-muc :after #'+jabber-tracking-add-muc)) 1422 (advice-add 'jabber-activity-add-muc :after #'+jabber-tracking-add-muc))
1428 1423
1424(setup (:straight (keepassxc-shim
1425 :host github :repo "duckwork/keepassxc-shim.el"))
1426 (keepassxc-shim-activate))
1427
1429(setup (:straight-when keychain-environment 1428(setup (:straight-when keychain-environment
1430 (executable-find "keychain")) 1429 (executable-find "keychain"))
1431 (keychain-refresh-environment)) 1430 (keychain-refresh-environment))
@@ -1462,8 +1461,9 @@ See also `crux-reopen-as-root-mode'."
1462 1461
1463(setup (:straight macrostep) 1462(setup (:straight macrostep)
1464 (:require macrostep) 1463 (:require macrostep)
1465 (:bind-into (emacs-lisp-mode lisp-interaction-mode) 1464 (dolist (m '(emacs-lisp-mode-map
1466 "C-c e" #'macrostep-expand)) 1465 lisp-interaction-mode-map))
1466 (define-key (symbol-value m) (kbd "C-c e") #'macrostep-expand)))
1467 1467
1468(setup (:straight (magit :host github :repo "magit/magit"))) 1468(setup (:straight (magit :host github :repo "magit/magit")))
1469 1469