[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient 7126d6a 6/9: Fix hydra-inspired colors
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient 7126d6a 6/9: Fix hydra-inspired colors |
Date: |
Mon, 25 Oct 2021 14:02:44 -0400 (EDT) |
branch: externals/transient
commit 7126d6aa7625037ce6714945b1e8ff9d9e9bd37c
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
Fix hydra-inspired colors
Red means continue and blue means quit. That doesn't make
sense to me but is what hydra uses, which we try to mimic.
See https://oremacs.com/2015/02/19/hydra-colors-reloaded.
---
lisp/transient.el | 22 +++++++++++-----------
1 file changed, 11 insertions(+), 11 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index b0dfad9..bcf0d34 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2188,17 +2188,17 @@ to `transient--do-warn'."
(setq this-command 'transient-popup-navigation-help))
transient--stay)
-(put 'transient--do-stay 'transient-color 'transient-blue)
-(put 'transient--do-noop 'transient-color 'transient-blue)
-(put 'transient--do-warn 'transient-color 'transient-blue)
-(put 'transient--do-warn-inapt 'transient-color 'transient-blue)
-(put 'transient--do-call 'transient-color 'transient-blue)
-(put 'transient--do-exit 'transient-color 'transient-red)
-(put 'transient--do-replace 'transient-color 'transient-red)
-(put 'transient--do-suspend 'transient-color 'transient-red)
-(put 'transient--do-quit-one 'transient-color 'transient-red)
-(put 'transient--do-quit-all 'transient-color 'transient-red)
-(put 'transient--do-move 'transient-color 'transient-blue)
+(put 'transient--do-stay 'transient-color 'transient-red)
+(put 'transient--do-noop 'transient-color 'transient-red)
+(put 'transient--do-warn 'transient-color 'transient-red)
+(put 'transient--do-warn-inapt 'transient-color 'transient-red)
+(put 'transient--do-call 'transient-color 'transient-red)
+(put 'transient--do-exit 'transient-color 'transient-blue)
+(put 'transient--do-replace 'transient-color 'transient-blue)
+(put 'transient--do-suspend 'transient-color 'transient-blue)
+(put 'transient--do-quit-one 'transient-color 'transient-blue)
+(put 'transient--do-quit-all 'transient-color 'transient-blue)
+(put 'transient--do-move 'transient-color 'transient-red)
;;; Commands
- [elpa] externals/transient updated (2b1d184 -> 74cba5a), Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient ee8bdcf 3/9: Fix alias definition, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient df13fef 2/9: Remove various duplicated words, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 56fb7a9 5/9: transient-setup: Cosmetics, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 791588d 7/9: transient--emergency-exit: Fix doc-string, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 0c2255a 8/9: transient-get-value: Add an emergency exit, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient badebdd 1/9: Set local checkdoc-symbol-words, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 7976562 4/9: Sharp-quote functions, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 74cba5a 9/9: Release version 0.3.7, Jonas Bernoulli, 2021/10/25
- [elpa] externals/transient 7126d6a 6/9: Fix hydra-inspired colors,
Jonas Bernoulli <=