... | ... |
@@ -3,6 +3,7 @@ |
3 | 3 |
[re-frame.core :as re-frame] |
4 | 4 |
[clojure.string :as string] |
5 | 5 |
[goog.string :as gstr] |
6 |
+ [dmr.config :as config] |
|
6 | 7 |
[dmr.styles :as styles] |
7 | 8 |
[dmr.subs :as subs] |
8 | 9 |
[dmr.events :as events])) |
... | ... |
@@ -284,7 +285,11 @@ |
284 | 285 |
(for [[index item] (enumerated @history)] |
285 | 286 |
^{:key index} [:li [input (item :input)] [output (item :output)]])])) |
286 | 287 |
|
288 |
+(defn footer [] |
|
289 |
+ [:footer {:class (styles/footer)} |
|
290 |
+ [:span.version (spaced "version:" config/version)]]) |
|
291 |
+ |
|
287 | 292 |
(defn main-panel [] |
288 | 293 |
[:div {:class (styles/screen)} |
289 | 294 |
[:div {:class (styles/main-panel)} |
290 |
- [title] [history] [prompt]]]) |
|
295 |
+ [title] [history] [prompt] [footer]]]) |