dimitri/sncf-bot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix issue when base_departure_date_time is missing

Browse source
This commit is contained in:
Dimitri Lozeve 2022-09-22 13:49:52 +02:00
parent 6dd42c3331
commit a0d471bbea
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
sncf/api.ss
View file

@ -46,10 +46,10 @@
(for/collect ((dep departures-json))
(let* ((info (hash-ref dep (string->symbol "display_informations")))
(stop-dt (hash-ref dep (string->symbol "stop_date_time")))
(base-dep-dt-str (hash-ref stop-dt (string->symbol "base_departure_date_time")))
(base-dep-dt (string->date base-dep-dt-str "~Y~m~dT~H~M~S"))
(dep-dt-str (hash-ref stop-dt (string->symbol "departure_date_time")))
(dep-dt (string->date dep-dt-str "~Y~m~dT~H~M~S")))
(dep-dt (string->date dep-dt-str "~Y~m~dT~H~M~S"))
(base-dep-dt-str (hash-ref stop-dt (string->symbol "base_departure_date_time") dep-dt-str))
(base-dep-dt (string->date base-dep-dt-str "~Y~m~dT~H~M~S")))
(departure (hash-ref info 'network)
(hash-ref info 'direction)
base-dep-dt