From 93e56a12d85df2e1aee2af2898728660bbecc6f4 Mon Sep 17 00:00:00 2001 From: yuzu-eva Date: Fri, 9 Jun 2023 19:05:18 +0200 Subject: added my nyxt configs --- .config/nyxt/status.lisp | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 .config/nyxt/status.lisp (limited to '.config/nyxt/status.lisp') diff --git a/.config/nyxt/status.lisp b/.config/nyxt/status.lisp new file mode 100644 index 0000000..50d2090 --- /dev/null +++ b/.config/nyxt/status.lisp @@ -0,0 +1,29 @@ +(in-package #:nyxt-user) + +(define-configuration :status-buffer + "Display modes as short glyphs." + ((glyph-mode-presentation-p t))) + +(define-configuration :force-https-mode ((glyph "ϕ"))) +(define-configuration :reduce-tracking-mode ((glyph "τ"))) +(define-configuration :no-script-mode ((glyph "σ"))) +(define-configuration :no-webgl-mode ((glyph "ω"))) +(define-configuration :blocker-mode ((glyph "β"))) + +(define-configuration status-buffer + "Hide most of the status elements but URL and modes." + ((style (str:concat + %slot-value% + (theme:themed-css (theme *browser*) + `("#controls,#tabs" + :display none !important)))))) + +(defmethod format-status-load-status ((status status-buffer)) + "A fancier load status." + (spinneret:with-html-string + (:span (if (web-buffer-p (current-buffer)) + (case (slot-value (current-buffer) 'nyxt::status) + (:unloaded "∅") + (:loading "∞") + (:finished "")) + "")))) -- cgit v1.2.3