diff options
| author | jao <jao@gnu.org> | 2024-11-07 18:01:13 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2024-11-07 18:01:13 +0000 |
| commit | 4308710de811e3b4e2fb47f9024439df03e96b90 (patch) | |
| tree | fb719224f99c57d6b2b9b0bd4257208f7d038dc4 /lib/eos/jao-minibuffer.el | |
| parent | 5efb9fee7e72c8c514d08940e98f7eb24b90c374 (diff) | |
| download | elibs-4308710de811e3b4e2fb47f9024439df03e96b90.tar.gz elibs-4308710de811e3b4e2fb47f9024439df03e96b90.tar.bz2 | |
{if,when}-let deprecation in emacs 31
Diffstat (limited to 'lib/eos/jao-minibuffer.el')
| -rw-r--r-- | lib/eos/jao-minibuffer.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/eos/jao-minibuffer.el b/lib/eos/jao-minibuffer.el index 77bd49a..d2bc70a 100644 --- a/lib/eos/jao-minibuffer.el +++ b/lib/eos/jao-minibuffer.el @@ -69,12 +69,12 @@ (insert msg))) (defun jao-minibuffer--strip-prev (msg) - (if-let ((n (text-property-any 0 (length msg) 'minibuffer-message t msg))) + (if-let* ((n (text-property-any 0 (length msg) 'minibuffer-message t msg))) (string-trim (substring msg 0 n)) msg)) (defun jao-minibuffer--prefix (msgs) - (when-let (p (string-join (butlast msgs) "\n")) + (when-let* ((p (string-join (butlast msgs) "\n"))) (unless (string-blank-p p) (concat p "\n")))) (defun jao-minibuffer--format-msg (msg) |