diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2026-03-29 23:03:18 +0200 |
|---|---|---|
| committer | Jonas Bernoulli <jonas@bernoul.li> | 2026-03-29 23:04:11 +0200 |
| commit | 83e82df51f8dd419457d02d4758dcbe6c2f14e11 (patch) | |
| tree | 1c9bab455fe3b0aa90a0d037acc7b79696127458 | |
| parent | 6c1bc80ec565ff7f60230b70c7e00fe4fa12575f (diff) | |
Make Cond-Let's when$ available
46 files changed, 46 insertions, 0 deletions
diff --git a/lisp/git-commit.el b/lisp/git-commit.el index 90d6670..4989d83 100644 --- a/lisp/git-commit.el +++ b/lisp/git-commit.el @@ -1300,6 +1300,7 @@ commit, then the hook is not run at all." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/git-rebase.el b/lisp/git-rebase.el index 07c11d9..7482847 100644 --- a/lisp/git-rebase.el +++ b/lisp/git-rebase.el @@ -948,6 +948,7 @@ is used as a value for `imenu-extract-index-name-function'." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-apply.el b/lisp/magit-apply.el index 318627e..990dba1 100644 --- a/lisp/magit-apply.el +++ b/lisp/magit-apply.el @@ -822,6 +822,7 @@ a separate commit. A typical workflow would be: ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-base.el b/lisp/magit-base.el index 5e5ad4e..5f5ec06 100644 --- a/lisp/magit-base.el +++ b/lisp/magit-base.el @@ -1223,6 +1223,7 @@ Like `message', except that `message-log-max' is bound to nil." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-bisect.el b/lisp/magit-bisect.el index 8df0c76..b1b5622 100644 --- a/lisp/magit-bisect.el +++ b/lisp/magit-bisect.el @@ -321,6 +321,7 @@ bisect run'." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-blame.el b/lisp/magit-blame.el index c9dc1d9..d037a7a 100644 --- a/lisp/magit-blame.el +++ b/lisp/magit-blame.el @@ -1006,6 +1006,7 @@ instead of the hash, like `kill-ring-save' would." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-bookmark.el b/lisp/magit-bookmark.el index 1e92edd..416989d 100644 --- a/lisp/magit-bookmark.el +++ b/lisp/magit-bookmark.el @@ -163,6 +163,7 @@ ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-branch.el b/lisp/magit-branch.el index 7292cc8..ea5c967 100644 --- a/lisp/magit-branch.el +++ b/lisp/magit-branch.el @@ -977,6 +977,7 @@ Also rename the respective reflog file." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-bundle.el b/lisp/magit-bundle.el index 068320f..f808593 100644 --- a/lisp/magit-bundle.el +++ b/lisp/magit-bundle.el @@ -142,6 +142,7 @@ ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-clone.el b/lisp/magit-clone.el index 272ec66..c25e1cc 100644 --- a/lisp/magit-clone.el +++ b/lisp/magit-clone.el @@ -354,6 +354,7 @@ Then show the status buffer for the new repository." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-commit.el b/lisp/magit-commit.el index 17fc8f4..2e1b730 100644 --- a/lisp/magit-commit.el +++ b/lisp/magit-commit.el @@ -869,6 +869,7 @@ Also see `git-commit-post-finish-hook'." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-core.el b/lisp/magit-core.el index d810fcf..c083161 100644 --- a/lisp/magit-core.el +++ b/lisp/magit-core.el @@ -126,6 +126,7 @@ Each of these options falls into one or more of these categories: ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-diff.el b/lisp/magit-diff.el index 73366fd..1864c62 100644 --- a/lisp/magit-diff.el +++ b/lisp/magit-diff.el @@ -3951,6 +3951,7 @@ If `magit-diff-visit-previous-blob' is nil, then always return nil." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-dired.el b/lisp/magit-dired.el index 164047a..be67f9f 100644 --- a/lisp/magit-dired.el +++ b/lisp/magit-dired.el @@ -116,6 +116,7 @@ Interactively, open the file at point." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-ediff.el b/lisp/magit-ediff.el index ec2584a..6846c55 100644 --- a/lisp/magit-ediff.el +++ b/lisp/magit-ediff.el @@ -565,6 +565,7 @@ is done setting up buffers." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-extras.el b/lisp/magit-extras.el index 0b30280..e863f68 100644 --- a/lisp/magit-extras.el +++ b/lisp/magit-extras.el @@ -833,6 +833,7 @@ In Magit diffs, also skip over - and + at the beginning of the line." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-fetch.el b/lisp/magit-fetch.el index 4e88d2e..7a60d2a 100644 --- a/lisp/magit-fetch.el +++ b/lisp/magit-fetch.el @@ -188,6 +188,7 @@ with a prefix argument." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-files.el b/lisp/magit-files.el index 2f4632b..ca45f3a 100644 --- a/lisp/magit-files.el +++ b/lisp/magit-files.el @@ -771,6 +771,7 @@ If DEFAULT is non-nil, use this as the default value instead of ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-git.el b/lisp/magit-git.el index a27ccfc..fb2398f 100644 --- a/lisp/magit-git.el +++ b/lisp/magit-git.el @@ -3056,6 +3056,7 @@ Instead use `magit-commit-p' or `magit-commit-oid'.") ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-gitignore.el b/lisp/magit-gitignore.el index f3e088d..5267038 100644 --- a/lisp/magit-gitignore.el +++ b/lisp/magit-gitignore.el @@ -198,6 +198,7 @@ Rules that are defined in that file affect all local repositories." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-log.el b/lisp/magit-log.el index 1ab5e92..6c2c428 100644 --- a/lisp/magit-log.el +++ b/lisp/magit-log.el @@ -2124,6 +2124,7 @@ all others with \"-\"." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-margin.el b/lisp/magit-margin.el index 943b166..50e0ce2 100644 --- a/lisp/magit-margin.el +++ b/lisp/magit-margin.el @@ -263,6 +263,7 @@ English.") ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-merge.el b/lisp/magit-merge.el index 33da15b..a60de22 100644 --- a/lisp/magit-merge.el +++ b/lisp/magit-merge.el @@ -325,6 +325,7 @@ If no merge is in progress, do nothing." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el index 219b0c9..fa82632 100644 --- a/lisp/magit-mode.el +++ b/lisp/magit-mode.el @@ -1638,6 +1638,7 @@ line. Avoid including the line after the end of the file." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-notes.el b/lisp/magit-notes.el index 07841ee..2f9f9d9 100644 --- a/lisp/magit-notes.el +++ b/lisp/magit-notes.el @@ -204,6 +204,7 @@ Also see `magit-notes-merge'." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-patch.el b/lisp/magit-patch.el index e1d4712..ca0c799 100644 --- a/lisp/magit-patch.el +++ b/lisp/magit-patch.el @@ -333,6 +333,7 @@ is asked to pull. START has to be reachable from that commit." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-process.el b/lisp/magit-process.el index 7c7e6ae..7e9f47c 100644 --- a/lisp/magit-process.el +++ b/lisp/magit-process.el @@ -1358,6 +1358,7 @@ Limited by `magit-process-error-tooltip-max-lines'." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-pull.el b/lisp/magit-pull.el index fe23d77..7eb1ab0 100644 --- a/lisp/magit-pull.el +++ b/lisp/magit-pull.el @@ -166,6 +166,7 @@ the upstream." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-push.el b/lisp/magit-push.el index 6739895..eac346c 100644 --- a/lisp/magit-push.el +++ b/lisp/magit-push.el @@ -374,6 +374,7 @@ You can add this command as a suffix using something like: ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-reflog.el b/lisp/magit-reflog.el index 52c9660..5a529c7 100644 --- a/lisp/magit-reflog.el +++ b/lisp/magit-reflog.el @@ -211,6 +211,7 @@ Type \\[magit-reset] to reset `HEAD' to the commit at point. ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-refs.el b/lisp/magit-refs.el index 6f96be0..ce3dc01 100644 --- a/lisp/magit-refs.el +++ b/lisp/magit-refs.el @@ -817,6 +817,7 @@ line is inserted at all." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-remote.el b/lisp/magit-remote.el index 9fc095d..d946880 100644 --- a/lisp/magit-remote.el +++ b/lisp/magit-remote.el @@ -422,6 +422,7 @@ using \"always\" for remotes named \"origin\". ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-repos.el b/lisp/magit-repos.el index 1ae754b..1ad8d91 100644 --- a/lisp/magit-repos.el +++ b/lisp/magit-repos.el @@ -559,6 +559,7 @@ instead." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-reset.el b/lisp/magit-reset.el index 0ef920c..0ae1c57 100644 --- a/lisp/magit-reset.el +++ b/lisp/magit-reset.el @@ -140,6 +140,7 @@ or \"detached head\" will be substituted for %s." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-section.el b/lisp/magit-section.el index 46741b9..d802ee4 100644 --- a/lisp/magit-section.el +++ b/lisp/magit-section.el @@ -2677,6 +2677,7 @@ with the variables' values as arguments, which were recorded by ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-sequence.el b/lisp/magit-sequence.el index b2a2e1c..788a8df 100644 --- a/lisp/magit-sequence.el +++ b/lisp/magit-sequence.el @@ -1145,6 +1145,7 @@ buffer (i.e., the reverse of how they will be applied)." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-sparse-checkout.el b/lisp/magit-sparse-checkout.el index 8a97624..bd0b98e 100644 --- a/lisp/magit-sparse-checkout.el +++ b/lisp/magit-sparse-checkout.el @@ -153,6 +153,7 @@ This header is not inserted by default. To enable it, add it to ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-stash.el b/lisp/magit-stash.el index 0327bd0..fa1d366 100644 --- a/lisp/magit-stash.el +++ b/lisp/magit-stash.el @@ -688,6 +688,7 @@ that make up the stash." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-status.el b/lisp/magit-status.el index 6748c91..1969035 100644 --- a/lisp/magit-status.el +++ b/lisp/magit-status.el @@ -826,6 +826,7 @@ Honor the buffer's file filter, which can be set using \"D - -\"." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-submodule.el b/lisp/magit-submodule.el index f8316db..db7385e 100644 --- a/lisp/magit-submodule.el +++ b/lisp/magit-submodule.el @@ -720,6 +720,7 @@ These sections can be expanded to show the respective commits." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-subtree.el b/lisp/magit-subtree.el index 23f37ab..daf4601 100644 --- a/lisp/magit-subtree.el +++ b/lisp/magit-subtree.el @@ -190,6 +190,7 @@ ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-tag.el b/lisp/magit-tag.el index cd4ead9..62212c8 100644 --- a/lisp/magit-tag.el +++ b/lisp/magit-tag.el @@ -249,6 +249,7 @@ a tag qualifies as a release tag." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-transient.el b/lisp/magit-transient.el index 8a38e9a..acff049 100644 --- a/lisp/magit-transient.el +++ b/lisp/magit-transient.el @@ -243,6 +243,7 @@ ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-wip.el b/lisp/magit-wip.el index c6f041b..d963b4c 100644 --- a/lisp/magit-wip.el +++ b/lisp/magit-wip.el @@ -388,6 +388,7 @@ many \"branches\" of each wip ref are shown." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit-worktree.el b/lisp/magit-worktree.el index 0595258..c70f221 100644 --- a/lisp/magit-worktree.el +++ b/lisp/magit-worktree.el @@ -316,6 +316,7 @@ with padding for alignment." ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") diff --git a/lisp/magit.el b/lisp/magit.el index e0766a4..2c35cfb 100644 --- a/lisp/magit.el +++ b/lisp/magit.el @@ -804,6 +804,7 @@ For X11 something like ~/.xinitrc should work.\n" ;; ("and>" . "cond-let--and>") ;; ("and-let" . "cond-let--and-let") ;; ("if-let" . "cond-let--if-let") +;; ("when$" . "cond-let--when$") ;; ("when-let" . "cond-let--when-let") ;; ("while-let" . "cond-let--while-let") ;; ("match-string" . "match-string") |
