diff options
| author | yuzu-eva <stevenhu@web.de> | 2023-06-09 19:05:18 +0200 |
|---|---|---|
| committer | yuzu-eva <stevenhu@web.de> | 2023-06-09 19:05:18 +0200 |
| commit | 93e56a12d85df2e1aee2af2898728660bbecc6f4 (patch) | |
| tree | f1ad25786f0ae961691e5b32a0fe72a2ce8a8849 /.config/nyxt/status.lisp | |
| parent | 70980c2c53e9fc3cadd2f6eacd085dc0297f65b6 (diff) | |
added my nyxt configs
Diffstat (limited to '.config/nyxt/status.lisp')
| -rw-r--r-- | .config/nyxt/status.lisp | 29 |
1 files changed, 29 insertions, 0 deletions
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 "")) + "")))) |
