biome-api-data: fix max forecast days for Flood API

This commit is contained in:
Pavel Korytov 2023-07-22 18:01:02 +03:00
parent 99dfaede5f
commit 5eb2b84592
2 changed files with 8 additions and 2 deletions

View file

@ -6199,7 +6199,7 @@
(:name . "Forecast days")
(:type . number)
(:min . 0)
(:max . 16))
(:max . 210))
("timeformat"
(:name . "Timeformat")
(:type . select)

View file

@ -315,7 +315,13 @@ NAME is the page name as given in `biome-api-parse--urls'."
(cl-loop for var in biome-api-parse--add-settings
if (member name (alist-get :pages var))
do (push (copy-tree (alist-get :param var))
(alist-get :fields (cdr settings-data)))))
(alist-get :fields (cdr settings-data))))
;; Fix forecast_days for Flood API
(when (equal name "Flood")
(let ((forecast-days (alist-get "forecast_days"
(alist-get :fields (cdr settings-data))
nil nil #'equal)))
(setf (alist-get :max forecast-days) 210))))
;; Add section-specific URL params
;; XXX I do not know why this doesn't work without returning
;; sections from the loop