You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

18 lines
339 B

(fn dump-contents [filename]
(let [f (assert (io.open filename))
contents (f:read "*all")]
(f:close)
contents))
{
:name "rules"
:display (fn [p]
(print (dump-contents "mode/rules.txt"))
)
:key-pressed (fn key-pressed [p k set-mode]
(set-mode :mode.menu)
)
}