diff options
| author | LLLL Colonq <llll@colonq> | 2026-07-21 00:14:25 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2026-07-21 00:14:25 -0400 |
| commit | f04ada478f4bfa5637744876f00ff56f85dcf552 (patch) | |
| tree | 50cde49222fdddf4274b3e123568fe2c75c5e155 /src/wasp-utils.el | |
| parent | 75e005e81b73d8471f16dc5fad7bbdc312bdbfe7 (diff) | |
Update
Diffstat (limited to 'src/wasp-utils.el')
| -rw-r--r-- | src/wasp-utils.el | 6 |
1 files changed, 5 insertions, 1 deletions
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 |
