From f04ada478f4bfa5637744876f00ff56f85dcf552 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Tue, 21 Jul 2026 00:14:25 -0400 Subject: Update --- src/wasp-utils.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/wasp-utils.el') diff --git a/src/wasp-utils.el b/src/wasp-utils.el index 14e4368d..9f29f6dc 100644 --- a/src/wasp-utils.el +++ b/src/wasp-utils.el @@ -76,6 +76,10 @@ BODY is passed directly to `cl-defstruct'." "Take element I from A." (ignore-errors (aref a i))) +(defun w/plist-get (key plist) + "Retrieve KEY from property list PLIST." + (plist-get plist key)) + (defun w/pick-random (xs) "Pick a random element of XS." (and xs (nth (random (length xs)) xs))) @@ -258,7 +262,7 @@ If TEXT is nil, use the empty string instead." (defun w/change-theme (theme) "Change the current theme to THEME." - (ef-themes-select theme) + (modus-themes-load-theme theme) (ef-themes-with-colors (setenv "COLONQ_BGCOLOR" bg-main) (set-face-attribute -- cgit v1.3.1