This commit is contained in:
David Botton 2021-02-16 13:18:14 -05:00
parent 4869d4f677
commit 75c881bdfa

View file

@ -80,8 +80,7 @@
(populate-dirs (truename (value dirs)))))
(set-on-double-click files
(lambda (obj)
(click ok)))
)
(click ok))))
(set-on-click ok (lambda (obj)
(declare (ignore obj))
(window-close win)