Added an 'is_admin' flag to the canvassers table.

This commit is contained in:
Simon Brooke 2016-10-14 13:45:11 +01:00
parent b93076c02f
commit 5a298b721b

View file

@ -172,6 +172,7 @@
;; encrypted passwords locally ;; encrypted passwords locally
[:authority_id "varchar(32) not null references authorities(id) on delete no action"] [:authority_id "varchar(32) not null references authorities(id) on delete no action"]
[:introduced_by "integer references canvassers(id)"] [:introduced_by "integer references canvassers(id)"]
[:is_admin :boolean]
;; true if the canvasser is authorised to use the app; else false. This allows us to ;; true if the canvasser is authorised to use the app; else false. This allows us to
;; block canvassers we suspect of misbehaving. ;; block canvassers we suspect of misbehaving.
[:authorised :boolean]))) [:authorised :boolean])))
@ -181,7 +182,7 @@
(kc/pk :id) (kc/pk :id)
(kc/table :canvassers) (kc/table :canvassers)
(kc/database yyydb/*db*) (kc/database yyydb/*db*)
(kc/entity-fields :id :fullname :phone :email :authorised) (kc/entity-fields :id :fullname :phone :email :is_admin :authorised)
(kc/has-one elector) (kc/has-one elector)
(kc/has-one address) (kc/has-one address)
(kc/has-one canvasser {:fk :introduced_by}) (kc/has-one canvasser {:fk :introduced_by})