This commit is contained in:
2024-09-15 22:51:12 -07:00
parent 7c9c25f09d
commit cb2490baae
7 changed files with 40 additions and 37 deletions

View File

@@ -24,6 +24,7 @@
("overcast clouds" . "☁️")
("shower rain" . "🌦️")
("light rain" . "🌧️")
("light intensity drizzle" . "🌧️")
("rain" . "🌧️")
("moderate rain" . "🌧️")
("thunderstorm" . "⛈️")
@@ -73,6 +74,8 @@
(call-with-values
(lambda () (extract-weather-data json-data))
(lambda (temp-c temp-f description icon)
;; For debugging
;;(format #t "Description: ~a ~%" description)
;; Display the weather information
(if temp-c