This commit is contained in:
pls.153 2022-10-01 09:36:29 +02:00
parent 5d0982182b
commit 7866c1f11b

View file

@ -54,10 +54,10 @@
:m-map "img/moon-map.jpg"
:m-info #.(read-file "txt/moon.txt")))
(qjs |addPlanet| *planets*
(list :m-name "Mars"
(list :m-name "Mars"
:m-shape "img/mars.png"
:m-map "img/mars-map.jpg"
:m-info #.(read-file "txt/mars.txt")))
:m-info #.(read-file "txt/mars.txt")))
(qjs |addPlanet| *planets*
(list :m-name "Jupiter"
:m-shape "img/jupiter.png"