18 lines
564 B
Common Lisp
18 lines
564 B
Common Lisp
;; -*- lisp -*-
|
|
|
|
;; This is NOT lisp. It is "yuck", a lisp-like language that is used
|
|
;; to configure eww. It is a subset of lisp, with some extra features
|
|
;; that make it more suitable for configuration.
|
|
|
|
(defpoll weather--data :interval "30m"
|
|
`curl wttr.in/84321?format=j1 | jq -c `)
|
|
|
|
(defwidget weather
|
|
[]
|
|
(box :class "module text"
|
|
:spacing 0
|
|
:orientation "v"
|
|
(label :class "special"
|
|
:text "${weather--data.current_condition[0].weatherDesc[0].value} ${weather--data.current_condition[0].temp_F}°F")
|
|
(label :text "current weather")))
|