mirror of
https://git.pumpin.online/funkpower/menologion.git
synced 2026-10-22 18:57:14 +00:00
The Horologion is the Book of Hours: the fixed portions of the services themselves. This shows the day's commemorations, its fast and its season, which is a Menologion. Naming it for a book whose contents it does not carry was a real error and worth the churn to correct. typikon already uses the word internally, for menologion.py and the data file it loads. That is not a collision: typikon provides a menologion, this displays one. Renamed throughout, not just the repo: the two scripts, the QML component and its three qmldir modules, MENOLOGION_COLORS, ~/.config/menologion/colors.json, the eww widgets and scss variables, the waybar class. Verified standalone and embedded in a foreign shell, and the smoke suite still passes. Also drops the em dashes from the prose.
85 lines
3.1 KiB
Plaintext
85 lines
3.1 KiB
Plaintext
;; menologion — the liturgical day for eww
|
|
;;
|
|
;; Include this from your own eww.yuck:
|
|
;;
|
|
;; (include "menologion/menologion.yuck")
|
|
;;
|
|
;; and put (menologion) in a window, or (menologion-bar) in a bar. Set a
|
|
;; jurisdiction by adding `--jurisdiction <name>` to both defpoll commands
|
|
;; below; leaving them as they are follows whatever `typikon --set-default`
|
|
;; wrote.
|
|
|
|
(defpoll typikon-day
|
|
:interval "30m"
|
|
:initial "{}"
|
|
`typikon --json`)
|
|
|
|
(defpoll typikon-week
|
|
:interval "30m"
|
|
:initial "{\"days\":[]}"
|
|
;; From tomorrow, not today: the head block above already shows today in
|
|
;; full, and simplexpr has no way to drop the first element of a list.
|
|
`typikon --json --days 6 --date $(date -d tomorrow +%F)`)
|
|
|
|
;; ── the one-line version, for a bar
|
|
(defwidget menologion-bar []
|
|
(box :class "menologion-bar"
|
|
:space-evenly false
|
|
:spacing 6
|
|
(label :class "glyph" :text {typikon-day.emoji ?: ""})
|
|
(label :class "title"
|
|
:limit-width 42
|
|
:text {typikon-day.title ?: "typikon?"})))
|
|
|
|
;; ── the full panel
|
|
(defwidget menologion []
|
|
(box :class "menologion"
|
|
:orientation "v"
|
|
:space-evenly false
|
|
:spacing 8
|
|
|
|
(box :class "head" :space-evenly false :spacing 11
|
|
(label :class "glyph-big" :text {typikon-day.emoji ?: ""})
|
|
(box :orientation "v" :space-evenly false :halign "start" :hexpand true
|
|
(label :class {(typikon-day.feast ?: "") != "" ? "title feast" : "title"}
|
|
:halign "start"
|
|
:wrap true
|
|
:lines 2
|
|
:text {typikon-day.title ?: "typikon is not on PATH"})
|
|
(label :class {typikon-day.obligation == "obligatory"
|
|
? "sub obligatory" : "sub"}
|
|
:halign "start"
|
|
:text "${typikon-day.weekday ?: ""}${
|
|
(typikon-day.season ?: "") != "" ? " · " : ""}${
|
|
typikon-day.season ?: ""}${
|
|
typikon-day.obligation == "obligatory"
|
|
? " · obligatory" : ""}")
|
|
(label :class "cycle"
|
|
:halign "start"
|
|
:visible {(typikon-day.cycle ?: "") != ""}
|
|
:text {typikon-day.cycle ?: ""})))
|
|
|
|
(label :class "fast"
|
|
:halign "start"
|
|
:text "${typikon-day.fastLabel ?: ""}${
|
|
(typikon-day.reason ?: "") != ""
|
|
? " — " : ""}${typikon-day.reason ?: ""}")
|
|
|
|
(box :class "rule")
|
|
|
|
;; the rest of the week
|
|
(box :orientation "v" :space-evenly false :spacing 2
|
|
(for d in {typikon-week.days ?: []}
|
|
(box :space-evenly false :spacing 9
|
|
(label :class "glyph" :text {d.emoji})
|
|
(label :class "weekday" :width 34 :xalign 0 :text {d.weekday})
|
|
(label :class {(d.feast ?: "") != "" ? "day feast" : "day"}
|
|
:hexpand true :xalign 0 :limit-width 40 :text {d.title}))))
|
|
|
|
(box :class "rule")
|
|
|
|
(box :space-evenly false
|
|
(label :class "pascha" :hexpand true :xalign 0
|
|
:text "Pascha ${typikon-day.pascha ?: ""}")
|
|
(label :class "pascha" :text {typikon-day.churchDate ?: ""}))))
|