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

Reword display of train station name

Browse source
This commit is contained in:
Dimitri Lozeve 2022-09-10 21:35:52 +02:00
parent f2defe4ad7
commit f822211000
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
sncf.ss
View file

@ -39,8 +39,7 @@
(get-station-id sncf-key station) (get-station-id sncf-key station)
(values "Vernon - Giverny (Vernon)" "stop_area:SNCF:87415604"))) (values "Vernon - Giverny (Vernon)" "stop_area:SNCF:87415604")))
(let-values (((departures disruptions) (get-departures sncf-key station-id))) (let-values (((departures disruptions) (get-departures sncf-key station-id)))
(displayln (compute-table-widths departures)) (displayln (str "Prochains départs de " station-name))
(displayln (str "Station : " station-name))
(display-departures-table departures) (display-departures-table departures)
(display-disruptions disruptions) (display-disruptions disruptions)
(when mattermost-url (when mattermost-url