@@ -57,4 +57,7 @@

       (as-> db

         (let [output (execute db cmdline)]

             (update-in db [:cmdline :history] conj

-                {:input cmdline :output output}))))})))

+                {:input cmdline :output output}))))

+     ; dispatch-later to ensure that the DOM has already been updated,

+     ; so that scrollMaxY has been changed appropriately.

+     :fx [[:dispatch-later {:ms 10 :dispatch [::scroll-to-bottom]}]]})))