Starting salvage operation; documenting things which need doing.
This commit is contained in:
parent
c9c9d09b97
commit
f93a0e854a
15
README.md
15
README.md
|
@ -10,7 +10,7 @@ generated using Luminus version "2.9.11.05"
|
||||||
|
|
||||||
## Status
|
## Status
|
||||||
|
|
||||||
Very early pre-alpha; user interface mostly works (enough to demonstrate), back end is hardly started.
|
Alpha level code. Most of it works, but it's a bit fragile.
|
||||||
|
|
||||||
## What is it supposed to do?
|
## What is it supposed to do?
|
||||||
|
|
||||||
|
@ -36,6 +36,19 @@ Where *username* is the username required to access the database, and *thisisnot
|
||||||
|
|
||||||
It will be helpful for you to have the [Zenhub](https://www.zenhub.com/) plugin in your browser, either Firefox or Chrome, as I'm using it for project planning.
|
It will be helpful for you to have the [Zenhub](https://www.zenhub.com/) plugin in your browser, either Firefox or Chrome, as I'm using it for project planning.
|
||||||
|
|
||||||
|
## Build procedure
|
||||||
|
|
||||||
|
YouYesYet is build on the [Application Description Language](https://github.com/simon-brooke/adl) framework, which is also mine and not widely used. Application Description Language is a very high level descriptor language for applications, which allows a huge amount of code to be automatically generated. This generated code is **not** checked into the repository; instead, you must regenerate it before you can build.
|
||||||
|
|
||||||
|
Consequently, to get a build running:
|
||||||
|
|
||||||
|
1. clone the repository, if you have not already done so;
|
||||||
|
2. within your cloned repository, check out a branch (usually `develop` or `master`);
|
||||||
|
3. if you have previously built the project within your cloned repository, run `lein clean`;
|
||||||
|
4. **this is the important bit** run `lein adl` to generate much of the application code;
|
||||||
|
5. run `lein run` to start your development server;
|
||||||
|
6. if you want to do client debugging, you'll want to run `figwheel` in a separate process, but also from the same cloned repository directory; I normally do this by opening a second terminal and invoking `lein figwheel`.
|
||||||
|
|
||||||
## Further Reading
|
## Further Reading
|
||||||
|
|
||||||
If you're thinking of joining in development on this I'd strongly recommend you get hold of a copy of [Dmitry Sotnikov](https://github.com/yogthos)'s [Web Development with Clojure, Second Edition](https://pragprog.com/book/dswdcloj2/web-development-with-clojure-second-edition).
|
If you're thinking of joining in development on this I'd strongly recommend you get hold of a copy of [Dmitry Sotnikov](https://github.com/yogthos)'s [Web Development with Clojure, Second Edition](https://pragprog.com/book/dswdcloj2/web-development-with-clojure-second-edition).
|
||||||
|
|
|
@ -5,6 +5,9 @@
|
||||||
:url "https://www.gnu.org/licenses/old-licenses/gpl-2.0.en.html"}
|
:url "https://www.gnu.org/licenses/old-licenses/gpl-2.0.en.html"}
|
||||||
:url "https://github.com/simon-brooke/youyesyet"
|
:url "https://github.com/simon-brooke/youyesyet"
|
||||||
|
|
||||||
|
;; NOTE: lein-ancient failed on 20220616; it will have to be done soon if the project is to
|
||||||
|
;; procede, but I need to fix regressions first.
|
||||||
|
|
||||||
:dependencies [[adl-support "0.1.6"]
|
:dependencies [[adl-support "0.1.6"]
|
||||||
[binaryage/devtools "1.0.3"]
|
[binaryage/devtools "1.0.3"]
|
||||||
[bouncer "1.0.1"]
|
[bouncer "1.0.1"]
|
||||||
|
|
|
@ -161,7 +161,7 @@
|
||||||
(secretary/defroute "/elector" []
|
(secretary/defroute "/elector" []
|
||||||
(ui/log-and-dispatch [:set-active-page :elector]))
|
(ui/log-and-dispatch [:set-active-page :elector]))
|
||||||
|
|
||||||
(secretary/defroute "/elector/:elector/:consent" {elector-id :elector}
|
(secretary/defroute "/elector/:elector" {elector-id :elector}
|
||||||
(ui/log-and-dispatch [:set-elector-and-page {:elector-id elector-id :page :elector}]))
|
(ui/log-and-dispatch [:set-elector-and-page {:elector-id elector-id :page :elector}]))
|
||||||
|
|
||||||
(secretary/defroute "/elector/:elector/:consent" {elector-id :elector consent :consent}
|
(secretary/defroute "/elector/:elector/:consent" {elector-id :elector consent :consent}
|
||||||
|
|
|
@ -381,7 +381,7 @@
|
||||||
(assoc (clear-messages db) :page k)
|
(assoc (clear-messages db) :page k)
|
||||||
db)))
|
db)))
|
||||||
|
|
||||||
|
;; TEMP: this is what doesn't seem to be being called
|
||||||
(reg-event-db
|
(reg-event-db
|
||||||
:set-address
|
:set-address
|
||||||
(fn [db [_ address-id]]
|
(fn [db [_ address-id]]
|
||||||
|
|
Loading…
Reference in a new issue