| Age | Commit message (Collapse) | Author |
|
Can't even remember what this was about; obviously positives when
grouping threads due to subject-matching being too lax? 🤷
|
|
They've been sitting here unstaged for, like, ever.
|
|
(Fix a linter nitpick in passing 🙊)
|
|
:inverse-video round 🙃
|
|
Also make add serifs to preprocessor directives because eheh why not.
Makes them distinct from "builtins" and gives them this "alien"
quality that reminds me that they belong to a whole other language… or
something.
|
|
|
|
|
|
|
|
Opened an Org buffer with this theme for the first time.
|
|
|
|
(pcase-dolist (`(,sym ,color)
eighters-palette)
(when (string-match-p "\\`fg-[a-z]*\\'" (symbol-name sym))
(when-let* ((sym-dim (intern (concat
(symbol-name sym)
"-dim")))
(dim-cdr (alist-get sym-dim eighters-palette))
(new-color (eighters-hsl-to-hex
(car (apply 'color-rgb-to-hsl
(color-name-to-rgb color)))
0.30 0.60)))
(message "%s → %s" sym-dim new-color)
(setcar dim-cdr new-color))))
|
|
|
|
(pcase-dolist (`(,sym ,color)
eighters-palette)
(when (string-match-p "\\`fg-[a-z]*\\'" (symbol-name sym))
(when-let* ((sym-dim (intern (concat
(symbol-name sym)
"-dim")))
(dim-cdr (alist-get sym-dim eighters-palette))
(new-color (eighters-hsl-to-hex
(car (apply 'color-rgb-to-hsl
(color-name-to-rgb color)))
0.4 0.66)))
(message "%s → %s" sym-dim new-color)
(setcar dim-cdr new-color))))
Followup changes:
* make strings the same color as constants (though dimmer) to make
types stand out more;
(Unfortunate side-effect: constants within strings stand out less.
Hm)
* only use variable-pitch for Gnus header names; keep empty
gnus-header because its docstring says all gnus-header faces must
inherit from it 🫡
* ARGH YES OH RIGHT HAD FORGOTTEN ABOUT MM-UU-EXTRACT UGH MY EYES
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Also make code comments outline-compliant.
|
|
Mainly for heading-like elements; keeping more colorful variants for
syntax constructs in programming languages.
|
|
|
|
Write down the method to the madness.
|
|
The rules I'm trying to adhere to:
1. theme faces, then standard faces, then third-parties;
2. if keeping a group of faces together makes maintenance easier,
define a "subgroup" and sort it at the end;
3. keep things sorted lexicographically, unless another order makes
sense (e.g. section hierarchy) and it's too much of a hassle to add
groups of comments.
|
|
By dimming hiding the common parts more.
|
|
Pops more; also somewhat consistent with the idea that it's a key
binding.
|
|
|
|
- bg #0 0 0
- bg-dim #1 1 1 → bg-hl-dimmer #0f0f0f
- bg-hl-dim #1a1a1a → bg-hl-dim #181818
- bg-hl #2 2 2
Dimmer:
- buttons
- fringe
- key bindings
- inactive mode line
- tab bar
- diff header 1 (command)
- diff header 2 (file)
- ediff unfocused hunks
- magit focused section
- magit focused hunk content
Dim:
- Custom editable fields (comment, field widget)
- highlight
- diff header 3 (hunk & function)
- magit unfocused hunk heading
Least dim:
- button box
- magit focused hunk heading
|
|
Nonplussed with Modus v4.
|
|
😵💫
Trying to get back the sense of sharp contrast I had before.
Snippets from *scratch* in case I need to recompute some of these:
(defun my/color-hsl-to-rgbhex (h s l)
(apply
'color-rgb-to-hex
`(,@(color-hsl-to-rgb h s l) 2)))
(defun my/color-hs1-l2 (c1 c2)
(pcase-let ((`(,h1 ,s1 _) (apply 'color-rgb-to-hsl
(color-name-to-rgb c1)))
(`(_ _ ,l2) (apply 'color-rgb-to-hsl
(color-name-to-rgb c2))))
(message "hue %.3f with s %.3f l %.3f" h1 s1 l2)
(apply 'color-rgb-to-hex
`(,@(color-hsl-to-rgb h1 s1 l2) 2))))
(defun my/modus-rgb (key palette)
(let ((value (car (alist-get key palette))))
(if (stringp value)
value
(car (alist-get value palette)))))
(list-colors-display
(list (my/modus-rgb 'bg-completion modus-vivendi-palette)
(my/color-hs1-l2 (my/modus-rgb 'bg-completion modus-vivendi-palette)
"#303030")
(my/color-hs1-l2 (my/modus-rgb 'bg-completion modus-vivendi-palette)
"#202020")))
(pcase-dolist (`(,sym ,val)
modus-vivendi-palette)
(when-let ((color (and (string-match "bg-\\(.*\\)-subtle" (symbol-name sym))
(match-string 1 (symbol-name sym))))
(darker (color-darken-name val 40.0)))
(message "%s (%s): %.2f"
color
val
(modus-themes-contrast val (car (alist-get (intern color) modus-vivendi-palette))))
(message "%s (%s): %.2f"
color
darker
(modus-themes-contrast darker
(car (alist-get (intern color) modus-vivendi-palette))))))
(dolist (diffkind '(removed changed))
(dolist (suffix '("" "-faint" "-refine"))
(insert (format "(bg-%s%s \"%s\")\n"
))))
(list-colors-display
(seq-map (pcase-lambda (`(,h ,l))
(apply 'color-rgb-to-hex `(,@(color-hsl-to-rgb h 1.0 l) 2)))
'((0.00 0.04)
(0.00 0.08)
(0.00 0.16)
(0.59 0.04)
(0.59 0.08)
(0.59 0.16)
(0.12 0.04)
(0.12 0.08)
(0.12 0.16))))
|
|
FTR, things that I expect to need further tweaks and/or discussions
with Prot:
(a) no "version" command, so it's kind of hard to guess what we are
working with programmatically,
(b) preset palettes overrides are unavailable before loading the
themes, and we can't require 'modus-themes either; maybe the
manual should point out that users who want to use those presets
should (1) do that in :config (2) load the theme twice?
(c) lots of backgrounds look very light/saturated to me even in the
"faint preset": e.g. diff backgrounds, selected completion,
region, eldoc current argument.
|
|
|
|
Try as I might, I can't get my fingers to reach for underscores when
my brain is thinking of *equality signs.
|
|
I don't use any of the auto-deferring keywords; setting this shaves a
bit off my startup time (5s ↘ 3.2s).
|
|
This reverts commit d3e251ac8ac4ee953fe24234b4ff4755a185b494.
Will customize use-package-always-defer instead.
|
|
Since I'm not using it anymore.
|
|
|
|
|
|
|
|
Also move it up, closer to Custom-related stuff.
|
|
Also update package list:
- account eglot and use-package being built-in
- add a couple of packages for Emacs development (elisp-benchmarks,
gnus-mock)
- remove paradox (most features now built into vanilla package.el)
|
|
Following the advice from (modus-themes) Sample configuration with and
without use-package.
|
|
That one was a doozy.
|
|
Undecided about C-c bindings. I like having them in "one neat pile",
rather than scattered across several use-package forms.
|
|
|
|
|