How to use Catppuccin Black without a fork?

[azzamsa]

Hi, 👋🏽

I am using a black variant of Catppuccin. I need to change ctp-current because the default it too dim.
Any suggestions?

@@ -310,7 +310,7 @@ FLAVOR defaults to the value of `catppuccin-flavor'."
 
         (ctp-current   (if (eq catppuccin-flavor 'latte)
                          (catppuccin-darken (catppuccin-color 'base) 5)
-                         (catppuccin-lighten (catppuccin-color 'base) 5))
+                         (catppuccin-lighten (catppuccin-color 'base) 17))
           (catppuccin-quantize-color
             (if (eq catppuccin-flavor 'latte)
               (catppuccin-darken (catppuccin-color 'base) 5)

(use-package catppuccin-theme
  :straight (catppuccin-theme :type git :flavor melpa :host github :repo "catppuccin/emacs")
  :config
  (setq catppuccin-flavor 'mocha)

  ;; Catppuccin black.
  (catppuccin-set-color 'base "#000000" 'mocha)
  (catppuccin-set-color 'mantle "#000000" 'mocha)
  (catppuccin-set-color 'crust "#000000" 'mocha)

  (catppuccin-reload)
  (load-theme 'catppuccin :no-confirm))

Thanks for maintaining Emacs Catppuccin 🥞

[azzamsa]

Use custom-set-faces.

(use-package catppuccin-theme
  :ensure t
  :config
  (setq catppuccin-flavor 'mocha)

  ;; `Overlay0` is too dim AA (3.35:1). `Overlay2` on base is (5.81:1).
  ;; but `Overlay2` is too bright for a comment.
  ;; Using `Subtext0` will get AAA, but it too similar to `Text`.
  (catppuccin-set-color 'overlay0 "#7f849c" 'mocha)

  ;; Catppuccin black.
  (catppuccin-set-color 'base "#000000" 'mocha)
  (catppuccin-set-color 'mantle "#000000" 'mocha)
  (catppuccin-set-color 'crust "#000000" 'mocha)

  (catppuccin-reload)
  (load-theme 'catppuccin t))

(with-eval-after-load 'catppuccin-theme
  ;; Must be used *after* the theme is loaded
  (custom-set-faces
   ;; The default `region` color for Mocha looks unpleasant on a black background.
   `(region ((t (:background "#313244"))))
   ;; The default `highlight` color for Mocha is invisible on a black background.
   `(highlight ((t (:background "#313244"))))))