I got a little crazy here. a lot of laptop poop

This commit is contained in:
Chris Cochrun 2021-09-22 09:58:13 -05:00
parent 263d10c080
commit fab3b36dec
47 changed files with 3726 additions and 189 deletions

24
nyxt/glyphs.lisp Normal file
View file

@ -0,0 +1,24 @@
(in-package #:nyxt-user)
;;allow setting glyphs
(define-configuration status-buffer
((glyph-mode-presentation-p t)))
;;various glyph settings with no additional configs
(define-configuration nyxt/force-https-mode:force-https-mode ((glyph "ϕ")))
(define-configuration nyxt/blocker-mode:blocker-mode ((glyph "β")))
(define-configuration nyxt/proxy-mode:proxy-mode ((glyph "π")))
(define-configuration nyxt/reduce-tracking-mode:reduce-tracking-mode ((glyph "∅")))
(define-configuration nyxt/certificate-exception-mode:certificate-exception-mode ((glyph "ɛ")))
(define-configuration nyxt/style-mode:style-mode ((glyph "s")))
(define-configuration nyxt/help-mode:help-mode ((glyph "?")))
;;configure web mode hints to home row and set glyph
(define-configuration nyxt/web-mode:web-mode
((nyxt/web-mode:hints-alphabet "ASDFGHJKL")
(glyph "ω")))
;;auto-mode config and set glyph
(define-configuration nyxt/auto-mode:auto-mode
((nyxt/auto-mode:prompt-on-mode-toggle t)
(glyph "α")))

View file

@ -1,6 +1,7 @@
(in-package #:nyxt-user) ; While implicit, this allows SLY to know which package we are in.
(dolist (file (list (nyxt-init-file "slynk.lisp"))))
(dolist (file (list (nyxt-init-file "glyphs.lisp"))))
(load-after-system :slynk (nyxt-init-file "slynk.lisp"))
;; (defvar *chris-prompt-keymap (make-keymap "chris-prompt-map"))
@ -105,7 +106,7 @@
:color "#e2e4e5"
:line-height "1fr")
("#container"
:grid-template-columns "0px 4fr 0px 2fr 0px 0px")
:grid-template-columns "2fr 0px 0px")
("#controls"
:background-color "#282a36"
:color "#f3f99d"