aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMiguel Ángel Moreno <mail@migalmoreno.com>2022-11-26 20:21:11 +0100
committerMiguel Ángel Moreno <mail@migalmoreno.com>2022-11-26 20:21:11 +0100
commitb246631a5f30e1b2d7e54efc8c5c0210670a043d (patch)
tree1aba91f821b208284dabb3dcd2aa307e10d9fd1f
parentba1dc8f1d7433869a7586c4a21f622fea6857d1d (diff)
mosaic.lisp: Add responsive styles.
-rw-r--r--mosaic.lisp16
1 files changed, 12 insertions, 4 deletions
diff --git a/mosaic.lisp b/mosaic.lisp
index 5c31591..134e98d 100644
--- a/mosaic.lisp
+++ b/mosaic.lisp
@@ -46,13 +46,17 @@
(:export-accessor-names-p t)
(:export-slot-names-p t)
(:accessor-name-transformer (class*:make-name-transformer name))
- (:documentation "A time widget."))
+ (:documentation "A time widget.")
+ (:metaclass user-class))
(defmethod display-widget ((widget time-widget) buffer)
(let ((time-style
(theme:themed-css (theme *browser*)
("#time"
- :font-size (font-size (font-settings widget))))))
+ :font-size (font-size (font-settings widget)))
+ ("@media screen and (max-width: 768px)"
+ ("#time"
+ :font-size "40px")))))
(hooks:once-on (nyxt:buffer-loaded-hook buffer) (buffer)
(ps-eval
:buffer buffer
@@ -84,12 +88,16 @@
(:export-accessor-names-p t)
(:export-slot-names-p t)
(:accessor-name-transformer (class*:make-name-transformer name))
- (:documentation "A greeting widget."))
+ (:documentation "A greeting widget.")
+ (:metaclass user-class))
(defmethod display-widget ((widget greeting-widget) buffer)
(let ((greeting-style (theme:themed-css (theme *browser*)
("#greeting"
- :font-size (font-size (font-settings widget))))))
+ :font-size (font-size (font-settings widget)))
+ ("@media screen and (max-width: 768px)"
+ ("#greeting"
+ :font-size "20px")))))
(hooks:once-on (nyxt:buffer-loaded-hook buffer) (buffer)
(ps-eval
:buffer buffer